Question

побудуйте математичну модель і створіть проект у якому можна обчислити суму або різницю або добуток або частку від ділення двох довільних чісел залежно від установлених позначок прапорців pascal

Answer 1

program ArithmeticOperations;

var

a, b, result: real;

operator: char;

begin

write('Введіть перше число: ');

readln(a);

write('Введіть друге число: ');

readln(b);

write('Введіть операцію (+,-,*,/): ');

readln(operator);

case operator of

'+': result := a + b;

'-': result := a - b;

'*': result := a * b;

'/': result := a / b;

else

writeln('Невірна операція');

exit;

end;

writeln('Результат: ', result:0:2);

end.