• Найти сумму и произведение всех нечетных двухзначных чисел (алгоритм и программу)

Ответы 1

  • program z_number; uses crt; var pr,i:integer; begin clrscr; pr:=1; i:=11;{Первое двузначное нечетное число} repeat pr:=pr*i; i:=i+2; until(i>100); writeln('Произведение двузначных нечетных чисел ',pr); readln; end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years