Напишите программу реализующую калькулятор на - вопрос №87559304 от arinahovhannisyan1 04.01.2021 09:16

Question

Информатика: Напишите программу реализующую калькулятор на 4 арифметических действия.на языке паскаль

arinahovhannisyan1 · Answer

Program test;

var
a,b:integer;
rezultat:real;
sign:char;
begin
rezultat:=0;
writeln('Введите числа a, b: ');
readln(a, b);
writeln('Введите знак операции: ');
readln(sign);
case sign of
'+': rezultat:=a+b;
'-': rezultat:=a-b;
'*': rezultat:=a*b;
'/': rezultat:=a/b else writeln('An error occurred: Invalid operation! Try again!');
end;
writeln(rezultat);
end.