Решить задачу на языке Паскаль: Задан двумерный целочисленный массив А из n строк и m столбцов (1 ≤ n, m ≤ 10). Составить программу, которая организует одномерный массив, каждый элемент которого есть сумма элементов исходного в столбце
212
443
Ответы на вопрос:
Var x,y: integer; begin writeln('введите число'); readln(x); if x< 0 then y: =100/x else y: =100*x; writeln('полученное число =', y); end.
Популярно: Информатика
-
KosmosUnicorn30.11.2022 20:51
-
TokOst21.05.2023 13:59
-
ANTON545221.06.2020 14:11
-
ПУТИН22221.12.2020 01:06
-
gost22608.04.2023 21:11
-
8Мария1102.04.2023 06:21
-
AnnaKhusainova09.05.2021 05:57
-
shaihiev09.04.2023 08:05
-
tanyanovikova509.04.2020 09:11
-
Carolina1Cerry24.01.2020 06:26