Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Nastya0bendy
15.05.2021 16:40 •
Информатика
На языке паскаль грузовой автомобиль выехал из одного из одного города в другой со скоростью v2 через x часов в том же направлении выехал легковой автомобиль со скоростью v2 км/ч
Ответ:
vladisnal2
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 оценок)
Популярные вопросы: Информатика
Dabby1
29.08.2022 06:41
1) Напишите названия кнопок и их назначения. 2) Запишите названия кнопок группы вкладки Ссылки....
kseniyapolozhe
15.10.2021 02:44
Информатика Сравните программы n_2 и n_3.Выделите в них общие блоки.Обратите внимание на различия....
avetik04
05.07.2022 01:21
Объясните назначение инструмента Транспортир (Protractor) в SketchUp, опишите принцип работы )...
omim
11.10.2022 15:53
Ребят запускаю комп кулеры крутятся, изображения на экране нет или пишит проверьте пит. каб в зависимости от кабеля. Дофига всего перепробовал. И еще момент, включаю без оперативки...
Niki567890
16.02.2020 16:54
Переведите число:22,10 из десятичной системы счисления в двоичную, восьмеричную и шестнадцатеричную системы счисления.с интернета не надо .и можно подробное решнение...
Nik08ov
13.06.2020 03:31
Какая цифра соответствует цветовой палитре: 7, 2, 3, 1, 5....
PomogitePPLez
31.05.2022 06:42
В корзине лежат 1112 шаров разного цвета. Сколько информации несет сообщение о том, что из корзины достали белый шар?...
ВасилийПетрович11
10.01.2021 13:57
Как сделать так, чтобы все светодиоды включались и выключились одновременно?...
max698
13.01.2021 12:21
Определи функцию условного форматирования в MS Excel. Использовать графики для демонстрации изменений данных за определенный период времени.Использовать формулы для вычисления данных...
кейсикупер1
28.11.2022 14:39
Какими буквами кодируются стрелки? • C, I, M, O •B, I, O, S •A, B, C, D • B, C, I, M...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.