СОСТАВИТЬ БЛОК-СХЕМУ: НАЙТИ ПРОИЗВЕДЕНИЕ ЧИСЕЛ ОТ 25 ДО 70! СРОЧНОООООООО!!!
var i,s:integer;
Begin
s:=25;
for i:=26 to 70 do s:=s*i;
writeln(s);
end.
Нажми, что
А можно именно блок-схему?