Регистрация
dimaarmytrac95
25.01.2022 14:02
Информатика
Есть ответ 👍

"День безпечного інтернету" зробити на цю тему тести(до іть будь-ласка)​

150
239
Посмотреть ответы 1

Ответы на вопрос:

Кисамяумяумур
Кисамяумяумур
4,5(39 оценок)
Const n=5; m=7; var a: array[1..n,1..m]of integer; i,j: integer; begin       for i: =1 to n do             begin                   for j: =1 to m do                         begin                             a[i,j]: =random(100);                             write(a[i,j]: 4);                         end;                   writeln;           end; writeln; for i: =1 to n do   begin     for j: =2 to m do         if j mod 2=0 then             write(a[i,j]: 4);       writeln;   end; end.    

Популярно: Информатика