Болотин
6 год назад
Составьте программу которая формирует массив из 15 случайных чисел от 10 до 100 и элементы массива состоящих на нечётных числах заменяют на 1
Элементы массива больше чем на 50 заменяет на 0 а остальные на 2
ОТВЕТЫ
Казимир
Jul 26, 2019
Const
n=15;
var
a:array[1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(90)+(10);
end;
for i:=1 to n do
if(a[i]gt;50) then a[i]:=0
else a[i]:=2;
end;
end.
С нечетными не смог :(
n=15;
var
a:array[1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(90)+(10);
end;
for i:=1 to n do
if(a[i]gt;50) then a[i]:=0
else a[i]:=2;
end;
end.
С нечетными не смог :(
264
Смежные вопросы:
