Сформировать массив из 10 случайных целых чисел из отрезка от -10 до 10 вывести номера чётных элементов массива

julianna19 julianna19    2   13.09.2019 15:40    1

Ответы
сакуру3356 сакуру3356  07.10.2020 12:09
Program z1;
var a:array[1..10] of integer;
i:integer;
for i:=1 to 10 do
begin
a[i]:=random(20)-10;
if i mod 2=0 then writeln(a[i]);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика