Var s,k:integer; begin s:=0; for k := 13 to 16 do s:=s+14; wrtiteln(s); end. Как решать такую программу?
Var s,k:integer;
begin
s:=0;
for k := 13 to 16 do
s:=s+14;
wrtiteln(s);
end.
Как решать такую программу?
Гость
Ответ(ы) на вопрос:
Гость Скорее всего, здесь нужно определить значение переменной s.
k - параметр цикла, Тело цикла (s:=s+14;) здесь выполнится 4 раза.
s=0;
k=13, s = s+14 = 0+14 = 14
k=14, s = 14+14 = 28
k=15, s = 28+14 = 42
k=16, s = 42+14 = 56
На экран будет выведено значение 56
Не нашли ответ?
Похожие вопросы