Ребят,срочно! Ввести одномерный массив из 9-ти элементов. Увеличить вдвое значение каждого положительного элемента, отрицательные элементы заменить нулём. Напечатать исходный и изменённый массив. язык Паскаль
Ответы:
06-02-2014 21:15
vara:array[1..9] of integer;i:integer;begin randomize; for i:=1 to 9 do begin a[i]:=random(-10,10); if a[i] > 0 then a[i]:=sqr(a[i]) else a[i]:=0; writeln(a[i]); end;end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Ребят,срочно! Ввести одномерный массив из 9-ти элементов. Увеличить вдвое значение каждого положительного элемента, отрицательные элементы заменить нулём. Напечатать исходный и изменённый массив. язык Паскаль» от пользователя Амелия Винарова в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!