Создайте программу, которая по введенному k - количеству грибов выводит фразу "мы нашли в лесу k грибов", причем согласовывает окончание слова "гриб" с числом k. Например, при k=11 должно быть выведено "Мы нашли в лесу 11 грибов", а при k=22 - "Мы нашли в лесу 22 гриба". (Принимается только программа на Паскале, не на листочке.)
110
190
Ответы на вопрос:
// pascalabc.net 3.0, сборка 1052 type matrix=array[,] of integer; function sumrow(a: matrix; i: integer): integer; var j,s: integer; begin s: =0; for j: =0 to length(a,1)-1 do s: =s+a[i,j]; sumrow: =s end; var i,j,m,n: integer; a: matrix; begin write('введите количество строк и столбцов массива: '); read(m,n); setlength(a,m,n); writeln('исходный массив'); randomize; for i: =0 to m-1 do begin for j: =0 to n-1 do begin a[i,j]: =random(51)-25; // интервал [-25; 25] write(a[i,j]: 4) end; writeln end; write('построчные суммы: '); for i: =0 to m-1 do write(sumrow(a,i),' '); writeln end. тестовое решение: введите количество строк и столбцов массива: 10 13 исходный массив -11 19 -1 12 -19 -7 25 16 6 -18 8 16 -22 -10 -9 21 21 -16 -14 10 7 -7 -21 23 -25 14 -16 -5 18 -6 12 -11 -23 -3 20 24 -4 -18 -16 -15 -1 5 -5 -9 -3 -9 0 0 21 -3 -15 -1 21 19 -17 21 15 2 11 -7 -17 5 23 -14 -5 -7 13 7 -5 -8 0 13 -25 -24 -14 -23 24 14 0 10 -11 10 -1 -5 -17 -12 -6 -16 -12 25 -16 20 -3 17 -24 19 7 -16 22 -22 3 18 -21 3 23 -3 -1 20 7 -19 23 -25 -24 -24 -21 -1 -20 2 -23 -18 25 4 -7 -4 -17 5 -9 -17 25 -8 построчные суммы: 24 -6 -28 -35 57 -35 -51 23 -65 -42
Популярно: Информатика
-
yulyaartemowa2009.10.2020 14:45
-
uztstdgiDima06.07.2020 03:16
-
dsid200518.05.2021 20:53
-
danifoxyforevep08iko11.09.2020 12:57
-
dzanhutovaiman31.01.2023 11:25
-
SureckMozg23.06.2020 06:21
-
linkolnvl02.06.2021 16:05
-
roman555555429.06.2023 21:52
-
Nactyska500476325601.05.2021 15:36
-
diana2525120.04.2022 20:16