Регистрация
vkuke
07.06.2020 05:36
Информатика
Есть ответ 👍

Очень важно! Умоляю ! Написать программу, которая находит сумму, произведение и среднее арифметическое 5 целых чисел.​

214
382
Посмотреть ответы 2

Ответы на вопрос:

РусикЛох
РусикЛох
4,5(3 оценок)

var

_sum, _multiplication, x, i : integer;

begin

_sum := 0;

_multiplication := 1;

writeln('Введите 5 чисел: ');

for i := 1 to 5 do

begin

readln(x);

_sum := _sum + x;

_multiplication := _multiplication * x;

end;

writeln('Сумма этих чисел:', _sum);

writeln('Произведение числе:', _multiplication);

writeln('Среднее арифметическое:', _sum/5:5:2);

end.

tanyaoganesova
tanyaoganesova
4,4(91 оценок)
Число 57: в двоичной - 111001 в восьмиричной - 71 в шестнадцатиричной - 39 число 151: в 2-ой 1001011 в 8-ой 227 в 16-ой 97

Популярно: Информатика