Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
saha174zxcvb
20.07.2020 19:14 •
Информатика
На языке паскаль грузовой автомобиль выехал из одного из одного города в другой со скоростью v2 через x часов в том же направлении выехал легковой автомобиль со скоростью v2 км/ч
Ответ:
неудачник16
02.08.2020 21:29
Var
V1,V2,X,T1:real;
Begin
Write('V1 = ');ReadLn(V1);
Write('V2 = ');ReadLn(V2);
Write('X = ');ReadLn(X);
Write('T1 = ');ReadLn(T1);
if V1*(T1+X) <= V2*T1 then Write('Догонит')
else Write('Не догонит')
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
felikstatenko2
12.10.2022 22:51
Назовите разновидности программ прикладного назначения...
умныйчеловеккслюблю
12.10.2022 22:51
Написать программу: написать программу на языке паскаль. с клавиатуры вводиться пятизначное число. определить, какая цифра больше, вторая или четвертая?...
Behruz2008
12.10.2022 22:51
Чему равен результат сложения двух чисел,записанных римскими цифрами мсм+lxviii?...
Elizabet4722
12.10.2022 22:51
Всоревновании учавствуют 300 спортсменов...
kcasimova2018
18.01.2022 23:14
Составить программу определения количества букв к в тексте, введённом с клавиатуры...
vprivat1604
30.10.2021 14:45
Выпишите названия операционных систем из списка: alt linux, logo, word 97, windovs 95,paint, ubuntu, free pascal, windows server 2003, photoshop, powerpoint, mac...
Supreme222
07.03.2021 14:14
Конспект по икт 8 класс операционная система...
annaegorova4
29.04.2020 23:47
Решите логическое выражение (x*y) следует (не x следует z)...
sofusavihc1289
13.04.2020 14:33
Пос ледовательномть действий, допустимых для исполнителя,-...
BusL81
21.05.2022 04:42
Сколько разрядов содержит 256-цветном рисунке?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
V1,V2,X,T1:real;
Begin
Write('V1 = ');ReadLn(V1);
Write('V2 = ');ReadLn(V2);
Write('X = ');ReadLn(X);
Write('T1 = ');ReadLn(T1);
if V1*(T1+X) <= V2*T1 then Write('Догонит')
else Write('Не догонит')
End.