Турбо паскаль

Среди всех трехзначных чисел найти те у которых первая цифра равна трем.

Question

Витяня

16 апреля, 21:15

+3

Ответы (1)

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

Козьминична · Answer 1

Var i:integer;

begin

for i=100 to 999 do if i div 100=3 then writeln (i,' ') ;

end.

Турбо паскальСреди всех трехзначных чисел найти те у которых первая цифра равна трем.