Костя и Петя занимаются лёгкой атлетикой. Сейчас они точно узнали, что

Костя и Петя занимаются лёгкой атлетикой. Сегодня они точно узнали, что Костя за 1 час может пробежать расстояние К1 километров M1 метров, а Петя может пробежать расстояние К2 километров M2 метров. Мальчишки очень утомились. Помогите им посчитать, какое будет меж ними расстояние, если они втечение 2-ух часов будут бежать в разные стороны.
Входные данные:
K1 M1 целые числа (0lt;=K1lt;=10, 0lt;=M1lt;1000)
K2 M2 целые числа (0lt;=K1lt;=10, 0lt;=M1lt;1000)
Выходные данные:
К3 M3 расстояние меж ребятами через два часа
Пример:
Ввод Вывод
1 200
1 200 4 800
3 300
2 720 12 40
Помогите составить программку для Pascal ABC

Задать свой вопрос
1 ответ
Uses crt; var k1,k2:integer; m1,m2:integer; rezk,rezm:integer; begin clrscr; writeln('введите сколько пробежал Костя k , m за час'); readln(k1, m1); writeln('введите сколько пробежал Петя к , м за час'); readln(k2, m2); if (010) and (k2gt;10) and (m1gt;1000)and(m2gt;1000)then begin writeln('ошибка'); end; end. незачто
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт