Может ли современный человек в наши дни обойтись без интернета?
(help! а то моя фантазия и силы кончились)
105
425
Ответы на вопрос:
Var n: integer; a,s: real; begin write('n = '); readln(n); writeln('введите числа(',n,' шт.)'); for n: = 1 to n do begin read(a); s: =s+a; end; writeln('sr = ',s/n); end.
Популярно: Информатика
-
kli200192uasmi30.11.2021 05:49
-
вова99310.07.2022 13:33
-
aldeerGroMo04.01.2021 04:21
-
valerunik160val07.05.2023 20:32
-
gumarin7820.12.2021 15:46
-
alisakiseleva215.09.2021 14:34
-
nik86921.11.2021 03:52
-
sagal6324.04.2020 00:43
-
TipsSpeed10.11.2020 01:23
-
ГЕОГАФИЯ20.11.2020 07:11