Найти произведение чисел от 1до 10,в паскале
Найти произведение чисел от 1до 10,в паскале
Гость
Ответ(ы) на вопрос:
Гостьvar i,s:integer; Begin s:=1; for i:=2 to 10 do s:=s*i; writeln(s); end.
Не нашли ответ?
Похожие вопросы