Написать программу в Паскале, выводящую на экран:

0 1 1 1 1

0 0 1 1 1

0 0 0 1 1

0 0 0 0 1

0 0 0 0 0

Используя оператор div и цикл в цикле

Question

Информатика

Альвина

13 апреля, 16:51

Написать программу в Паскале, выводящую на экран:

0 1 1 1 1

0 0 1 1 1

0 0 0 1 1

0 0 0 0 1

0 0 0 0 0

Используя оператор div и цикл в цикле

+2

Ответы (1)

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

Аграфена · Answer 1

program HelloWorld;

var res, i, z: integer;

begin

for i:=4 downto 0 do

begin

for z:=5 downto 1 do

begin

res : = 0;

if i div z > 0 then res : = 1;

write (res) ;

write (' ') ;

end;

writeln ('') ;

end;

end.

Написать программу в Паскале, выводящую на экран:0 1 1 1 10 0 1 1 10 0 0 1 10 0 0 0 10 0 0 0 0Используя оператор div и цикл в цикле

Написать программу в Паскале, выводящую на экран:

0 1 1 1 1

0 0 1 1 1

0 0 0 1 1

0 0 0 0 1

0 0 0 0 0

Используя оператор div и цикл в цикле