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

Question

Эмилия

19 мая, 10:53

+4

Ответы (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.