Регистрация
dashutka20032
19.07.2022 12:19
Информатика
Есть ответ 👍

Ребята задание по программированию В данном двумерном числовом массиве A (n,n) указать индексы всех элементов равных нулю

180
209
Посмотреть ответы 2

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

Вика1609000
Вика1609000
4,7(56 оценок)

работает

Объяснение:

var

a,b,i,j,k:longint;

s:array[1..100,1..100] of longint;

begin

read(a,b);

for i:=1 to a do begin

   for j:=1 to b do read(s[i,j]);

   end;

for i:=1 to a do begin

   for j:=1 to b do  

   if s[i,j]=0 then writeln(i,' ',j);

   end;

   end.

verymam
verymam
4,5(93 оценок)
Program z1;   const n = 100;   var a: array [1..n] of integer; i,s: integer; sz: real; begin  for i: =1 to n do  begin    a[i]: =3*i;     write (a[i],' ');   end;       s: =0;   for i: =1 to n do    s: =s+a[i];       sz: =s/n;   writeln;   writeln('a) ',s);   writeln('b) ',sz); end.

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