Помогите пожалуйста! Запишите значение переменной k, полученное в результате работы...

0 голосов
617 просмотров

Помогите пожалуйста!

Запишите значение переменной k, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Алгоритмический язык
алг
нач
цел k, i
k := 4
нц для i от 1 до 3
k := i + 2*k
кц
вывод k
кон

Бейсик
DIM i, k AS INTEGER
k = 4
FOR i = 1 TO 3
k = i + 2*k
NEXT i
PRINT k

Паскаль
Var k, i: integer;
Begin
k := 4;
For i := 1 to 3 do
k := i + 2*k;
Writeln(k);
End.


Информатика (15 баллов) | 617 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Код программы
var
    k, i: integer;

begin
    k := 4;
    for i := 1 to 3 do
        k := i + 2 * k;
    Writeln(k);
end.

Вывод
43

(53.1k баллов)