Мавр
6 год назад
Задание под б помогите
ОТВЕТЫ
Titovich
Jul 4, 2019
Var t,k:integer;
begin
t:=1;
for k:=2 to 5 do t:=t*k;
writeln(t);
end.
Результат:
120
Таблица (правильная):
k t
1
2 1*2=2
3 2*3=6
4 6*4=24
5 24*5=120
begin
t:=1;
for k:=2 to 5 do t:=t*k;
writeln(t);
end.
Результат:
120
Таблица (правильная):
k t
1
2 1*2=2
3 2*3=6
4 6*4=24
5 24*5=120
44
Смежные вопросы:
