Запишите значение переменной t, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык
Алг
Нач
Цел t,i
t := 2
нц для i от 1 до 3
t := t * i
кц
вывод t
кон
Бейсик
DIM i,t AS INTEGER
t = 2
FOR i = 1 TO 3
t = t * i
NEXT i
PRINT t
Паскальа
Var t,i: integer;
Begin
t := 2;
For i := 1 to 3 do
t := t * i;
Writeln(t);
End.
Алг
Нач
Цел t,i
t := 2
нц для i от 1 до 3
t := t * i
кц
вывод t
кон
Бейсик
DIM i,t AS INTEGER
t = 2
FOR i = 1 TO 3
t = t * i
NEXT i
PRINT t
Паскальа
Var t,i: integer;
Begin
t := 2;
For i := 1 to 3 do
t := t * i;
Writeln(t);
End.