Составьте программу вычисления Pascal.
Найти произведение двузначных чисел кратных 15.
Нужна полная програаму вычисления. Помогите пожалуйста.

Есть ответ
17.12.2022
156

Ответ


var prod,i:integer;

begin

   prod:=1;

   for i:=10 to 99 do

      if(i mod 15=0) then prod:=prod*i;

   writeln(prod)

end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.