1. 

   lex16 New Member

   var s, k:integer; begin s:= 1; for k:= 1 to 7 do s:= s + k; writeln (s); end.

    

   lex16, 27 фев 2010

   #1
2. 

   jools New Member

   Программа суммирует числа от 1 до 7, и после этого выводит получившееся  значение на экран. Возможно там ошибка, должно быть s:=0. Если s:= 1; то программа суммирует числа от 1 до 7 +1

    

   jools, 27 фев 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня