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

Question

Эмилия

25 апреля, 05:16

+5

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