Заполнить случайным образом массив размерностью n=20, выбрать из последовательности все элементы которые заканчиваются на 0.

makskos4444 makskos4444    1   21.05.2019 15:40    0

Ответы
szaikin szaikin  16.06.2020 06:16

var n,i:integer;

a:array[1..20] of integer;

begin

n:=20;

for i:=1 to n do

begin

a[i]:=random()%202+1;

if a[i] mod 10 = 0 then writeln(a[i]);

end;

readln;

end.

ну как то так.. нету возможности проверить.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика