задание под б помогите

Приложения:

Ответы

Ответ дал: petyaGavrikov
0
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
Ответ дал: ternovka1721
0
А там разве не 720 в троссировочной таблице,потому что по условию к<=5
Ответ дал: petyaGavrikov
0
120
Вас заинтересует