Это интересно! Попробуйте напечатать слово клавиатура, не смотря на клавиатуру (задание не выполняют - id1489759020210330 от Max1643 30.03.2021 10:59

Question

Информатика: Это интересно! Попробуйте напечатать слово клавиатура, не смотря на клавиатуру (задание не выполняют те, кто на телефоне и кто знает расположение всех клавиш на клаве)

Max1643 · Accepted Answer

1)var a:array[1..4,1..4] of integer;       i,j,s:integer; begin       for i:=1 to 4 do          for j:=1 to 4 do                 readln(a[i,j]);                      for i:=1 to 4 do begin                       writeln();                    for j:=1 to 4 do begin                       write(a[i,j],   );                      if (i+j 5) then s:=s+a[i,j];                         end;                  end; writeln(); write(s); end. 2)var a:array[1..4,1..4] of integer;       i,j,s:integer; begin    ...

MOGZ ответил