7. Составить алгоритм и написать решение задачи на Паскале: Сгенерировано целое число х1. Определить среднее арифметическое трех чисел х1, х2 и х3, каждое из которых больше предыдущего в 4 раза.

Question

Володюша

11 февраля, 21:40

+2

Ответы (1)

Знаете ответ?

Вака · Answer 1

var a, b, c:real;

begin

writeln ('Введите 3 числа') ;

readln (a, b, c) ;

write ('Среднее арифметическое=', (a+4*a+16*a) / : 0:2) ;

end.