Информатика, опубликовано 2018-08-22 21:36:20 by Гость
Помогите пожалуйста сделать задачу в паскале АВС. Нужно первый элемент отрицательного массива заменить на ноль.
Ответ оставил Гость
var
a: array [1..3] of shortint;
i: byte;
begin
for i := 1 to 3 do
begin
a[i] := random(-1024, -1);
writeln(String.Format(a[{0}] => {1}, i, a[i]));
end;
writeln();
a[1] := 0;
for i := 1 to 3 do writeln(String.Format(a[{0}] => {1}, i, a[i]));
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на