Регистрация
shlykhta95
21.06.2020 07:06
Информатика
Есть ответ 👍

Решение задач в интегрированной среде разработки. ​

165
374
Посмотреть ответы 1

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

maria1020304050
maria1020304050
4,4(52 оценок)
Program al; const n=3; var a: array [1..n,1..n] of integer; k,i,j: integer; begin writeln('vvedite massiv: '); for i: =1 to n do begin   for j: =1 to n do   begin  read(a[i,j]);     end;     writeln;     end; k: =0; for i: = 1 to n do for j: = 1 to n do if a[i,j] mod 5=0 then inc(k); writeln('kolicestvo cisel kratnih 5=', k); readln; end.

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