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

Question

Информатика

Линыч

5 октября, 08:30

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

+4

Ответы (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.