Здравствуйте, выполните работу по информатике по абсолютным и относительным ссылкам,
173
363
Ответы на вопрос:
var s,p: int64; i,kol,m: integer; a: array of integer; begin readln(kol); s: =0; p: =0; m: =0; setlength(a,kol); for i : = 1 to kol do begin read(a[i]); s: =s+a[i]; p: =p*a[i]; end; m: =s div kol; writeln('сумма ',s); writeln('произведение',p); writeln('среднее значение',m);
end.
Популярно: Информатика
-
Анна11111111515.11.2021 19:40
-
fffff13126.02.2023 05:19
-
Крутой43567807.12.2022 00:18
-
megaandreychuk22.02.2020 11:16
-
haikyuu2429.10.2022 12:28
-
vi60008111.05.2021 13:00
-
mathmatic288205.02.2023 09:48
-
Жанна64413.04.2021 13:18
-
ДарьяРэя21.05.2021 23:07
-
skuryan11.10.2020 06:34