Регистрация
ab198me
22.04.2020 19:40
Информатика
Есть ответ 👍

Какое число будет выведено в результате работы следующей программы?
var k, s: integer;
bedin
k:=1; s:=0;
repeat s:=s+k;
k:=k+2;
until k меньше 8
writeln (s) ;
end.

145
348
Посмотреть ответы 1

Ответы на вопрос:

kesha326
kesha326
4,6(30 оценок)

10 cls 

15 s=120 input "введите размерность"; n 

30 for i=1 to n40 input "введите число"; a(i)  50 next i  60 for i=1 to m  70 if a(i) > 0 then m=m+a(i) else s=a(i)*s80 next i  90 print s 

95 print m100 end 

Популярно: Информатика