Cothris
7 год назад
Напишите программу печатающую номера элементов массива больших 30 (Паскаль)
ОТВЕТЫ
Vabebvato
Jul 17, 2019
Program example;
var arr: array[1..50] of Integer;
i: Integer;
begin
randomize;
for i:=1 to 50 do
arr[i]:= random (100);
for i:= 1 to 50 do
begin
if arr[i] gt; 30 then
writeln (Array[, i, ] = , arr[i]);
end;
end.
var arr: array[1..50] of Integer;
i: Integer;
begin
randomize;
for i:=1 to 50 do
arr[i]:= random (100);
for i:= 1 to 50 do
begin
if arr[i] gt; 30 then
writeln (Array[, i, ] = , arr[i]);
end;
end.
188
Смежные вопросы:
