4. Пользователь вводит количество элементов массива, массив заполняется случайными целыми числами, после чего выводятся те из них, что больше 50
174
ОТВЕТЫ
Program n1;
type mas= array of Integer;
var imas: mas;
n,i: integer;
begin
randomize;
writeln(введите длинну массива: );
readln(n);
SetLength(imas, n);
for i:=0 to n do imas[i]:=random(100);
for i:=0 to n do if(imas[i]gt;50) then writeln(imas[i]);
end.
type mas= array of Integer;
var imas: mas;
n,i: integer;
begin
randomize;
writeln(введите длинну массива: );
readln(n);
SetLength(imas, n);
for i:=0 to n do imas[i]:=random(100);
for i:=0 to n do if(imas[i]gt;50) then writeln(imas[i]);
end.
99
Отв. дан
Maveri
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Алексей
3. Заполнить массив случайными целыми числами из отрезка [-10; ...
2019-05-24 05:39:14
Иннокентий
2. Найти наименьший элемент массива случайных чисел ...
2019-05-24 05:39:01
Mokelv
3. Вычислить сумму цифр произвольного целого числа. ...
2019-05-24 05:38:47
Анатольевич
Чему в десятичной системе счисления равно число 1110012? ...
2019-05-24 05:35:40