Что будет напечатано?Var s,k: integer; Begin S:=0; For k:=2 to 9

Что будет напечатано?Var s,k: integer; Begin S:=0; For k:=2 to 9 do S:=S+2*k;Write (s);End.

Задать свой вопрос
1 ответ

Что будет написано?


Var s,k: integer;
Begin
S:=0; // задается изначальное значение суммы
For k:=2 to 9 do // цикл изменяет значение переменной от 2 ло 9
S:=S+2*k; // высчитывается сумма
Write (s); // выводится ответ
End.
k = 2 -gt; s=0+2*2   -gt; s = 4
k = 3 -gt; s=4+3*2   -gt; s = 10
k = 4 -gt; s=10+4*2 -gt; s = 18
k = 5 -gt; s=18+5*2 -gt; s = 28
k = 6 -gt; s=28+6*2 -gt; s = 40
k = 7 -gt; s=40+7*2 -gt; s = 54
k = 8 -gt; s=54+8*2 -gt; s = 70
k = 9 -gt; s=70+9*2 -gt; s = 88

Ответ: 88

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт