Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
3 / 4 / 4
Регистрация: 22.10.2017
Сообщений: 31

Определить на сколько метров переместится машинка, которая финиширует второй

16.12.2017, 20:58. Показов 1191. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Известный время для каждой машинки, необходимое для перемещения на первый метр. Ваша задача-определить на сколько метров переместится машинка, которая финиширует 2, в тот момент времени, когда машинка победитель на финише.
Входные данные:
считать с клавиатуры три целых числа n,a,b.
n-длина трассы в метрах.
a,b-время каждой из машинок, для перемещения на первый метр.
Исходных данных:
на экран вывести позицию проигрышной машинки в метрах. Если для машинок задано одинаковое время - вывести n.
Ввод
Вывод
4 2 3
3
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
16.12.2017, 20:58
Ответы с готовыми решениями:

Определить на сколько метров переместится машинка, которая финиширует 2
Удивительную игру приобрели родители для своих детей. Игрушечную версию знаменитой «Формулы 1». Феррари, Макларен, Уильямс и т. Д. Вы...

Сколько нужно рулонов обоев для оклейки комнаты длиной m метров, шириной n метров и высотой h метров?
1. Одна задача - одна тема. Тем более что картинку вы не вложили. 2.Сколько нужно рулонов обоев для оклейки комнаты длиной m метров,...

Определить, на сколько переместится лодка, если рыбаки поменяются местами
Два рыбака сидят в неподвижной лодке на расстоянии l=5,0 м друг от друга. Масса лодки М=280 кг, массы рыбаков m1=70 кг и m2=140 кг. Если...

1
 Аватар для FreudeMan
108 / 95 / 45
Регистрация: 12.09.2017
Сообщений: 1,127
17.12.2017, 11:22
Лучший ответ Сообщение было отмечено VPL как решение

Решение

вроде так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
var n, a, b : real;
begin
  repeat
  Write('n = ');
  Readln(n);
  if (n<0) or (n=0)
  then Writeln('Ошибка ввода данных!');
  until n>0;
  repeat
  Write('a = ');
  Readln(a);
  if (a<0) or (a=0)
  then Writeln('Ошибка ввода данных!');
  until a>0;
  repeat
  Write('b = ');
  Readln(b);
  if (b<0) or (b=0)
  then Writeln('Ошибка ввода данных!');      // 40 5 10
  until b>0;
  if (a=b) or (a>b)
  then Writeln('Вывод: ',n);
  if a<b
  then Writeln('Вывод: ',n*a/b);
end.
Добавлено через 31 минуту
комментарий я себе добавлял для удобства, чтобы проверить, не обращай на него внимания
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
17.12.2017, 11:22
Помогаю со студенческими работами здесь

Сколько должно быть обои для наклеивания помещения длиной М, шириной И метров и высотой Х метров, ширина рулона 10 см
Даны числа A, B, Sub, удовлетворяющие аксиомы треугольника и число P.Выполните следующие действия:если Р = 1-найдете периметр...

Определить за сколько дней улитка проползет N метров?
В день улитка проползает по вертикальной поверхности вверх 1,5 метров. за ночь сползает на 20 см. Определить за сколько дней она...

Определить, сколько квадратных метров асфальта уложено на все улицы
Система улиц Нью-Йоркского района Манхеттен весьма интересна. В Манхеттене есть n улиц, идущие с запада на восток (авеню), и m улиц, идущие...

Определить сколько квадратных метров асфальта уложено на все авеню и улицы
Система улиц Нью-Йоркского района Манхеттен весьма интересна. В Манхеттене есть n улиц, идущие с запада на восток (авеню), и m улиц, идущие...

Определить, через сколько часов после начала наводнения уровень воды будет не менее, чем K метров
Задача. Перед началом наводнения уровень воды в реке составлял H метров. Во время наводнения каждый час уровень воды увеличивался на P...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru