Составить программу на паскале для ввода с клавиатуры 15 чисел и вывода номеров отрицательных элементов . после заменить эту программу на оператор while
210
461
Ответы на вопрос:
var a: array[1..15]of integer; x,i: integer; begini: =1; while i< 16 do beginreadln(x); if x< 0 then a[i]: =x; inc(i); end; for i: =1 to 15 do if a[i]< 0 then writeln(i); end.
Популярно: Информатика
-
sig46dg22.06.2021 13:20
-
КристинаСоболева25.02.2022 19:39
-
gulya10123.07.2022 06:46
-
Alex1t006.05.2022 02:20
-
KerimovaLuiza91910.12.2022 14:00
-
VovanGh16508.06.2022 19:10
-
Ilonka273420.01.2020 22:19
-
biryukovih14.05.2020 22:04
-
artyom298004.06.2023 03:00
-
bubininaaas531.10.2022 22:46