Дано значение расстояния в метрах. Составить программу, определяющую больше ли это расстояние чем 100 км.

Question

Информатика

Эрнестина

11 августа, 16:55

Дано значение расстояния в метрах. Составить программу, определяющую больше ли это расстояние чем 100 км.

+5

Ответы (1)

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

Станимир · Answer 1

Если в паскале то

Program fhfhjhf;

var a, a1 : integer;

begin

Writeln ('апиши число') ;

Readln (a) ;

Writeln ('Найдем число') ;

a1 = a*0.001;

If a1>100 then writeln ('Конечно больше')

else Writeln ('Конечно меньше') ;

Writeln ('Не за что') ;

end.