Паскаль Найдите произведение первых 10 натуральных чисел при помощи оператора while

Ответы:
Митя СмолярчукПотоцькый
03-04-2011 02:32

program qq;var per, res:integer;begin  per:=1;  while(per < 10) do  begin    res:=per*(per + 1);    per := per + 1;   end;   write(res);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Таня Марцыпан

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Паскаль Найдите произведение первых 10 натуральных чисел при помощи оператора while» от пользователя Таня Марцыпан в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!