Задан двумернный массив вевести на экран элементы больше 20

polina3782 polina3782    1   09.08.2019 22:50    3

Ответы
nikitamarar2177 nikitamarar2177  04.10.2020 08:09
Var
a:array[1..10,1..10] of integer;
i,j:integer;

begin
{
здесь надо задать массив.
Как пример задания случайного массива:
 for i:=1 to 10 do
  for j:=1 to 10 do
   begin
    a[i,j]:=random(10)+1;
   end;
}
 for i:=1 to 10 do
  for j:=1 to 10 do
   begin
    if a[i,j]>20 then write(a[i,j])
   end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика