Помогите написать программу по Информатике!

Question

Помогите написать программу по Информатике! Найти произведение двузначных нечетных чисел, кратных 13.

Answer 1

44

novikov

18 августа 2022

var i, ans: longint; begin i: =10; ans: =1; while i < 100 do begin if (i mod 13=0) and (i mod 2 <> 0) then ans: =ans*i; inc (i); end; writeln (ans); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: