Вывести на экран числа от 1 до 5 1) прямом порядке 2) обратном порядке модель 1) 1 2 3 4 5 2) 5 4 3 - id657948920200316 от CatTv2006 16.03.2020 16:51

Question

Информатика: Вывести на экран числа от 1 до 5 1) прямом порядке 2) обратном порядке модель 1) 1 2 3 4 5 2) 5 4 3 2 1

CatTv2006 · Accepted Answer

Задача №1 var a:array [1..20] of integer;      i:integer; begin  randomize;    for i:=1 to 20 do begin    a[i]:=random(19-(-10)+1)+-10;      write (a[i], );            end; end. Задача №2 var a:array [1..20] of integer;  i:integer;  begin  writeln( Введите числа в интервале [-20;29] );  for i:=1 to 10 do read(a[i]);  for i:=1 to 10 do  if (a[i] -29) and (a[i] 20) then write(a[i], );  end. Задача №3 var a:array [1..20] of integer;  i,sum:integer;  begin  randomize;  sum:=0;  for i:=1 to 20 do  begin ...

Вывести на экран числа от 1 до 5 1) прямом порядке 2) обратном порядке модель 1) 1 2 3 4 5 2) 5 4 3 2 1

MOGZ ответил