1)заполнить массив из 15 элементов числами из интервала от -10 до 10 вывести в строчку и повторно вывести в строчку,заменив все четные элементы на число 100. 2) заполнить массив целыми положительными и отрицательными числами из интервала [-10; 10] и вывести его в строчку. поменять знаки элементов массива на противоположные и повторно вывести массив на экран в строчку. ,, !
234
497
Ответы на вопрос:
1) var i: integer; a: array[1..15] of integer; begin randomize; for i: =1 to 15 do a[i]: = random(10)-10; for i: =1 to 15 do write(' ',a[i]); writeln(' '); for i: =1 to 15 do if a[i] mod 2=0 then a[i]: =100; for i: =1 to 15 do write(a[i],' '); end. 2) var i: integer; a: array[1..15] of integer; begin randomize; for i: =1 to 15 do a[i]: =random(10)-10; for i: =1 to 15 do write(' ',a[i]); writeln(' '); for i: =1 to 15 do a[i]: =a[i]-2*a[i]; for i: =1 to 15 do write(a[i],' '); end.
Лицензионная - за которую нужно заплатить, чтобы использовать. условно бесплатная - с наличием срока использования просто так, на пробу, а потом по желанию приобрести после истечения срока. свободно распространяемая - за которую не надо платить разработчикам, так сказать, даром.
Популярно: Информатика
-
kama21heas2106.01.2021 03:30
-
аааааааа3601.02.2023 06:27
-
MALsEeE115.01.2022 10:45
-
yana60301.01.2021 20:10
-
Lisa551121.01.2023 00:10
-
marina1979301.05.2023 08:15
-
Сергей0043118.04.2022 19:50
-
tbbkc23.12.2022 19:18
-
Метеор7323.12.2020 10:29
-
andreuss200625.03.2021 22:47