Дана программа. Определить результат выполнения. program N02;
const A: array [1..10] of integer = (1,36,2,18,3,12,4,9,6,6);
var i,k: integer;
begin
k:=0;
for i:=1 to 7 do
if A [i] < A [i+1] then k : = k + 1 ;
write(k)
end.
234
494
Ответы на вопрос:
Популярно: Информатика
-
missisruso24.10.2022 02:36
-
fedorinovkirs14.04.2020 09:05
-
Надежда1класс10.02.2022 11:06
-
kotkin18.01.2020 19:46
-
ПростоПапаЮра12.01.2022 19:21
-
7986910669826.10.2022 22:56
-
Mew320011.01.2022 23:36
-
Abdul1810.06.2020 07:32
-
zzizziz09.06.2020 01:23
-
228апимпрорпрмирир15.08.2022 02:43