Question

Напишите программу, сумму и частное трёх чисел

Answer 1

vara,b,c:real;beginwriteln('Введите 3 числа: ');readln(a,b,c);writeln('a+b+c= ',a+b+c);writeln('a:b:c= ',a/b/c);end.

Answer 2

var
a,b,c:real;
begin
writeln('Введите 3 числа: ');
readln(a,b,c);
writeln('a+b+c= ',a+b+c);
writeln('a:b:c= ',a/b/c);
end.