Даны числа: 1578; 3019; 8856; 21395. Используя MS Excel, вычисли сумму данных чисел.
Умоляю
214
241
Ответы на вопрос:
Program massiv; const n=40; var i : integer; kon2: array[1..n]of integer; kon1: array[1..n]of integer; begin writeln('изначальный массив'); randomize; for i: =1 to n do kon1[i]: =random(51)-10; for i: =1 to n do write(kon1[i],' '); writeln; writeln('исходный массив'); for i: =1 to n do begin kon2[i]: =kon1[i]*kon1[n]; write(kon2[i],' '); end; readln; end.
Популярно: Информатика
-
Losvlosinavhlasinah10.07.2021 10:05
-
Pro228Pro29.04.2022 15:54
-
vikatormash0909.04.2020 06:14
-
Артем235711.11.2022 18:47
-
Лиза50509012.05.2023 09:27
-
ybrybrjdbx0929.02.2020 06:16
-
сарвиназ00207.04.2021 17:55
-
Ravshanbekovna28.10.2021 04:29
-
жанат1705.07.2021 17:20
-
ZayacZnaniy10.12.2022 00:01