составить программу распечатки на экране чисел от 80 до 10, кратных 11. На паскале, ребят =)

Question

Лавруся

8 апреля, 13:08

+3

Ответы (2)

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

Памфилий · Answer 1

var i: integer;

begin

for i:=80 downto 10 do

if (i mod 11=0) then writeln (i) ;

end.

Галюня · Answer 2

var

i: integer;

begin

for i : = 80 downto 10 do

if i mod 11 = 0 then

writeln (i) ;

end.