Question

Преобразовать программу так, чтобы пользователь мог ввести только реальные значения скорости автомобиля. Условие: скорость >20, но при этом <200 в паскале.

Answer 1

Var v:real;
begin
Write('Введите v, v>20,v<200: ');
Readln(v);
while (v<=20)or(v>=220) do
 begin
 Write('Введите v, v>20,v<200: ');
 Readln(v);
 end;
writeln('v = ',v);
end.

Пример:
Введите v, v>20,v<200: 15
Введите v, v>20,v<200: 550
Введите v, v>20,v<200: 150
v = 150

Answer 2

Program
Uses crt;
Var x;
Begin
Writeln('Введите a, a>20,a<200');
Read(a);
End.

Answer 3

Для того чтобы пользователь мог ввести только реальные значения скорости автомобиля, необходимо добавить проверку на соответствие условию скорости (>20 и <200 в паскалях).

В программе нужно добавить следующие шаги:

1. Запросить у пользователя ввод скорости автомобиля. 2. Преобразовать введенное значение в целое число. 3. Проверить, что скорость больше 20 и меньше 200 в паскалях. 4. Если значение проходит проверку, то вывести текст "Скорость автомобиля валидна". Если значение не проходит проверку, то запросить у пользователя новое значение скорости.

Вот пример кода на языке Python:

valid_speed = False

while not valid_speed:
    speed = input("Введите скорость автомобиля: ")
    speed = int(speed)
    
    if speed > 20 and speed < 200:
        valid_speed = True
        print("Скорость автомобиля валидна")
    else:
        print("Некорректная скорость. Попробуйте еще раз.")

Эта программа будет просить пользователя ввести скорость, пока он не введет значение, удовлетворяющее условию (больше 20 и меньше 200 в паскалях). Только после этого программа выведет сообщение "Скорость автомобиля валидна". Если пользователь введет некорректное значение, программа выдаст сообщение "Некорректная скорость. Попробуйте еще раз." и запросит новое значение скорости.