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

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

Question

Петрай

18 июля, 10:05

+1

Ответы (1)

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

Феона · Answer 1

Var i:integer;

begin

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

end.

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