Зашифруйте с таблицы из предыдущего следующие слова: меню,пуск,команда,вкладка(нужно написать цифрами например: (буква м 14 по счёту в алфавите и так и записывать) т.д, : )
151
213
Ответы на вопрос:
Меню - 14.6.15.32. пуск - 17.21.19.12. команда - 12.16.14.1.15.5.1. вкладка - 3.12.13.1.4.12.1. сделай !
Var a: array of integer; n: integer; i: integer; sum: integer; begin randomize; write('n = '); readln(n); setlength(a, n + 1); writeln('массив: '); for i : = 1 to n do begin a[i] : = random(50) - 25; write(a[i] + ' '); end; writeln; writeln('без отрицательных: '); for i : = 1 to n do begin if a[i] > = 0 then write(a[i] + ' '); end; sum : = 0; writeln; writeln('среднее арифметическое: '); for i : = 1 to n do begin sum : = sum + a[i]; end; writeln(sum / n); end.
Популярно: Информатика
-
Магомед0511104.04.2023 21:58
-
amid200319.12.2021 16:43
-
Ленчикбарми16.04.2021 00:27
-
vladimirovna12107.04.2022 05:05
-
Хрустяня30.01.2020 13:32
-
PSV2301.06.2020 09:46
-
kekkak2206.04.2021 21:18
-
liiiiiiiiiii29.03.2022 07:49
-
elizavetaliza8927.05.2022 02:42
-
DeathNomberOne01.03.2022 20:42