1) Определите, что будет напечатано в результате работы следующего фрагмента программы:...

Question

1) Определите, что будет напечатано в результате работы следующего фрагмента программы:
var k, s: integer;
begin
s:=0;
for k:=1 to 11 do
s:=s+k;
write(s);
end.
2) Определите, что будет напечатано в результате работы следующего фрагмента программы:
var n, s: integer;
begin
s := 0;
for n:=3 to 7 do
s := s + n;
write(s)
end.

Answer 1

1) если введённое число попадёт в промежуток от 1 до 11, то программа выполнит сложение 0+ введённое число и выведет результат.
Например,
Вводим 3, 0+3=3, программа выведет 3
2) аналогично

Comments

У вас после каждой итерации цикла s не сбрасывается, будет прибавление к уже существуещему числу

Answer 2

В первом случае будет: 66
В втором случае будет: 25

Comments

Это же готовая программа. Скачай себе http://joxi.ru/xAe0KPospJGpR2 и копи паст в неё и запускай.

---

чувак, тут не так все просто,я тоже могу в паскаль это вбить, получится ответ. надо написать почему так происходит

---

Мы объявили переменную s, далее начинается цикл, где k++ с каждой новой итерации в цикле, соответственно мы считаем, что s=s+k в первом случае это будет 0+1, во втором случае 1+2, в третьем 3+3 и так далее.