Паскаль! Составить алгоритм для вычисления произведения Чисел: 5, 10, 15, ..., 55.

Question

Информатика

Милетя

7 марта, 00:37

Паскаль! Составить алгоритм для вычисления произведения Чисел: 5, 10, 15, ..., 55.

+4

Ответы (1)

Знаете ответ на вопрос?

Виленин · Answer 1

Program Lloyd;

var

i, a:integer;

begin

a:=1;

for i:=1 to 55 do begin

if (i mod 5) = 0 then

a:=a*i;

end;

writeln ('Произведение = ', a) ;

end.