Составить блок-схему алгоритма и программу вывода на экран всех двузначных чисел

Question

Информатика

Ританя

4 сентября, 14:16

Составить блок-схему алгоритма и программу вывода на экран всех двузначных чисел

+1

Ответы (1)

Знаете ответ?

Лексей · Answer 1

program gf;

var x: integer;

begin

write ('Положительные двухзначные числа: ') ;

For x:=-99 to 99 do

if (x-100) then

write (x, ' ') ;

writeln;

write (' Отрицательные двухзначные числа: ') ;

For x:=-99 to 99 do

if (x>9) and (x<100) then

write (x, ' ') ;

end.