Написать программу на языке паскаль для нахождения среднего значения из n введенных целых чисел от 10 до 100
238
362
Ответы на вопрос:
var
n : integer;
a : integer;
s : real;
begin
write('введите количество чисел ');
readln(n);
for var i : = 1 to n do begin
write(i,'-е число равно = ');
readln(a);
s += a;
end;
writeln('среднее значение равно ', s/n);
end.
числа вводим
Популярно: Информатика
-
Shady200227.03.2021 16:10
-
ermolaeva1207Arina10.04.2021 20:07
-
кувшинкаВейВей18.12.2022 07:12
-
kirik201707.03.2022 22:06
-
Suprunenko200712.03.2023 08:17
-
Nurayka26923.04.2022 12:15
-
Pahamoseuv29.12.2020 02:34
-
сада229.04.2023 00:23
-
klokova049otccwt18.08.2020 06:25
-
longer12328.11.2022 17:27