=Ввести три целых числа с клавиатуры. Найти их произведение, сумму и среднее арифметическое.
Ответы на вопрос
Ответил archery
0
var
a, b, c: integer;
begin
read(a, b, c);
writeln('P = ',a * b * c);
writeln('S = ',a + b + c);
writeln('A = ',(a + b + c) / 3);
end.
a, b, c: integer;
begin
read(a, b, c);
writeln('P = ',a * b * c);
writeln('S = ',a + b + c);
writeln('A = ',(a + b + c) / 3);
end.
Новые вопросы