Составьте программу вычисления Pascal.

Найти произведение двузначных чисел кратных 15.

Нужна полная програаму вычисления. Помогите пожалуйста.

1

Ответы и объяснения

  • nelle987
  • Ведущий Модератор
2013-03-15T14:36:58+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

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.