Question

Требуется написать программу на ABC Pascal. даю 18 баллов

Answer 1

Var
   a,b,c,d:integer;
   e : real;
begin
   readln (a,b);

   c := a + b;
   d := a * b;
   e := a / b;
 
   writeln ('Сумма = ',c,' произведение = ',d, ', а частное = ',e);

end.

Answer 2

Var a,b: real;beginwriteln('Введите первое число');readln(a);writeln('Введите второе число');readln(b);writeln('a+b= ',a+b);writeln('a*b= ',a*b);writeln('a/b= ',a/b);end.