Введите с клавиатуры скорость объекта в км/ч (от - вопрос №85315715100 от seba777 16.03.2022 06:42

Question

Информатика: Введите с клавиатуры скорость объекта в км/ч (от 5 до 100) и выведите на экран сообщение об объекте (человек, велосипедист или автомобилист) 5-10 человек, 10-20 велосипедист, 20-100 автомобиль.

seba777 · Answer

program speed;

var

V:byte;

begin

writeln('enter speed');

readln(V);

if ((V>=5) and (V<=100)) then begin

case V of

5..10: writeln('man');

11..20: writeln('bike');

21..100: writeln('car');

end;

end.

Введите с клавиатуры скорость объекта в км/ч (от 5 до 100) и выведите на экран сообщение об объекте