4. Вывести на экран только те элементы массива, которые меньше 5, элементы
массива заданы случайным образом.
var
а:array [1..10] of integer;
i:integer;
begin
for……begin
a[i]:=…(10);
write (a[........]:3);
end;
writeln;
writeln ('новый массив');
end.
Помогите,пожалуйста!
массива заданы случайным образом.
var
а:array [1..10] of integer;
i:integer;
begin
for……begin
a[i]:=…(10);
write (a[........]:3);
end;
writeln;
writeln ('новый массив');
end.
Помогите,пожалуйста!
More Questions From This User See All
Answers & Comments
Pascal
var
a:array [1..10] of integer;
i:integer;
begin
randomize;
for i:=1 to 10 do begin
a[i]:=random(10);
write(a[i]:3);
end;
writeln;
for i:=1 to 10 do
if a[i]<5 then
write(a[i]:3);
end.