
Марин
5 год назад
задание под б Пожалуйста посчитайте

ОТВЕТЫ

Kiril
Oct 24, 2020
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
837
Смежные вопросы: