ТутРешу.Ру

Составьте алгоритм для вычисления произведения чисел 5,10,15…

Задание:

Составьте алгоритм для вычисления произведения чисел 5,10,15… 55. У меня есть начало, вот оно закончите пж: r; =5, n: =55; i: =i+5.

Решение:

Var i,s: integer; begini: =5; s: =1; while i <= 55 do begins: =s*i; i: =i+5; end. writeln (s); end.




Знаете другой ответ?

Отправить свой ответ