Информатика, опубликовано 2018-08-22 19:12:09 by Гость
паскаль. заполнить массив случайными числами от -20 до 20. вывести на экран. все отрицательные числа заменить на 5
Ответ оставил Гость
Program chik;
var a:array[1..1000]of integer;
i,n:integer;
begin
readln(n);
randomize;
for i:=1 to n do
begin
a[i]:=random(41)-20;
if(a[i]end;
for i:=1 to n do
write(a[i], );
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на