Написать программу Pascal ABC. Написать программу которая по определенным числам a и b и введеному действию выполняет вычисление. Программу надо сделать с оператором Case m of. ПОМОГИТЕ ПОЖАЛУЙСТА.

Вопрос школьника по предмету Информатика

Написать программу Pascal ABC. Написать программу которая по определенным числам a и b и введеному действию выполняет вычисление. Программу надо сделать с оператором Case m of. ПОМОГИТЕ ПОЖАЛУЙСТА.

Ответ учителя по предмету Информатика

Var

A,B:integer;

Z:char;

Begin

Write(‘A = ‘);ReadLn(A);

Write(‘B = ‘);ReadLn(B);

WriteLn(‘Введите знак(+ , -, *, /)’);

ReadLn(Z);

Case Z of

‘+’:WriteLn(‘A + B = ‘,A+B);

‘-‘:WriteLn(‘A — B = ‘,A-B);

‘*’:WriteLn(‘A * B = ‘,A*B);

‘/’:WriteLn(‘A / B = ‘,A/B);

End;

End.