Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Составьте программу:пользователь вводит 3 любых целых числа.Найти: сумму,произведение,деление произведения на сумму этих чисел)пожалуйста

Ответ оставил Гость

Var a, b, c, sum, proiz, del: real;
begin
readln (a, b, c);
sum:=a+b+c;
proiz:=a*b*c;
del:=proiz/sum;
writeln (sum=, sum);
writeln (произведение=, proiz);
writeln (деление произведения на сумму=, del);
end.