Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Найти численное решение задачи Коши Найти численное решение задачи Коши y' = y3, y(0) = 0.5 на отрезке с шагом h = 0.2. Указание. При применении метода простых итераций преобразовать исходное уравнение так, чтобы итерационный процесс сходился. Заранее спасибо https://www.cyberforum.ru/ pascalabc/ thread2033718.html	Pascal ABC Задача о рюкзаке: упаковать рюкзак так, чтобы общая ценность предметов была наибольшей и вес не превышал объем рюкзака «ЗАДАЧА О РЮКЗАКЕ» Путешественник собрался в поход. Перед ним 5 предметов, для каждого известна ценность (стоимость) (4, 1, 8, 7, 1) и определен вес (6, 5, 3, 1, 7) . Имеется рюкзак объема 15 . Требуется упаковать рюкзак так, чтобы общая ценность упакованных предметов была наибольшей и их общий вес не превосходил объем рюкзака. Помогите пожалуйста.
Pascal ABC Получить значение заданного выражения https://www.cyberforum.ru/ pascalabc/ thread2033007.html Помоги решить(((	Pascal ABC Цикл: Вывести сумму первых N элементов арифметической прогрессии https://www.cyberforum.ru/ pascalabc/ thread2032989.html Вывести сумму первых N элементов арифметической прогрессии, текущий элемент которой больше предыдущего элемента на квадрат порядкового номера текущего элемента. Значение первого элемента прогрессии равно единице. Входные данные: 6 Выходные данные: 196
Pascal ABC Найти индекс последнего наименьшего элемента целочисленной числовой последовательности Найти индекс последнего наименьшего элемента целочисленной числовой последовательности Входные данные: 5 3 2 7 3 2 Выходные данные: 5	Pascal ABC Найти сумму четных элементов массива https://www.cyberforum.ru/ pascalabc/ thread2032959.html Дан линейный массив на N элементов. Найти сумму четных элементов массива. Входные данные: 4 10 98 89 -843 Выходные данные: 108
Pascal ABC Вывести на печать через пробел значение положительных четных элементов массива с четным индексом https://www.cyberforum.ru/ pascalabc/ thread2032943.html Дан целочисленный линейный массив на N элементов. Вывести на печать через пробел значение положительных четных элементов массива с четным индексом. Входные данные 10 350 142 965 -997 -254 -581 308 308 -68... Выходные данные 142 308	Произвести преобразования в целочисленном файле Pascal ABC Ввести целочисленный файл f . Найти значение k – количество чётных элементов в файле, далее найти сумму последних k элементов. Полученным значением заменить каждую вторую компоненту файла. Вывести на экран файл как до, так и после преобразования.
Pascal ABC Все нулевые элементы последовательности замените единицами и подсчитайте количество замен https://www.cyberforum.ru/ pascalabc/ thread2032543.html Дана последовательность чисел. Все нулевые элементы последовательности замените единицами и подсчитайте количество замен.	Pascal ABC Вычислить сумму ряда \sqrt{1+\sqrt{2+\sqrt{3+...\sqrt{+50}}}} https://www.cyberforum.ru/ pascalabc/ thread2031608.html
Pascal ABC Вычислить сумму ряда Вычислить сумму 1-\frac{2}{3}x+\frac{3}{4}x^2-\frac{4}{5}x^3+...+\frac{11}{12}x^{10} при x = 2.program _5_37; uses crt; var s:real; i,k,x:integer; begin	Pascal ABC Сколькими способами можно разложить число на слагаемые Лесенка Лесенкой называется набор кубиков, в котором каждый более верхний слой содержит кубиков меньше, чем предыдущий. Требуется написать программу, вычисляющую число лесенок, которое можно построить из N кубиков. Входные данные Во входном файле INPUT.TXT записано натуральное число N (1 ≤ N ≤ 100) – количество кубиков в лесенке. Выходные данные В выходной файл OUTPUT.TXT... https://www.cyberforum.ru/ pascalabc/ thread2029252.html

Puporev

Почетный модератор

64300 / 47595 / 32743

Регистрация: 18.05.2008

Сообщений: 115,181

02.09.2017, 13:19

Какой из транспортов быстрее? - Pascal ABC - Ответ 10726882

02.09.2017, 13:19. Показов 1708. Ответов 1

Метки (Все метки)

Сообщение было отмечено SatanaXIII как решение

Решение

Pascal

var t1,t2,m1,m2:integer;
begin
write('Время движения троллейбуса t1=');
readln(t1);
write('Время движения маршрутки t2=');
readln(t2);
write('Во сколько минут вышла Катя m1=');
readln(m1);
write('Во сколько минут вышла Лена m2=');
readln(m2);
if t1+m1>m2+t2 then write('Катя приехала раньше')
else if t2+m2<t1+m1 then write('Лена приехала раньше')
else write('Девочки приехали одновремено');
end.

Вернуться к обсуждению:
Какой из транспортов быстрее? Pascal ABC

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

02.09.2017, 13:19

Готовые ответы и решения:

Определите, какой из катеров быстрее других сможет оказать помощь судну
несколько однотипных спасательных катеров ,находяшихся в акватории в точках с координатой...

Какой быстрее
Подскажите какой процессор лучше Intel Pentium Dual-Core E6300 или amd athlon ii x2 250

Какой цикл быстрее?
Написал программку, которая подсчитывает время выполнения цикла (while и for) по итогам...

Какой алгоритм быстрее?
1. Тангенс можно вычислить как sin(x)/cos(x), разложив обе функции в ряд Тейлора. 2. А можно...

	02.09.2017, 13:19

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

02.09.2017, 13:19

Помогаю со студенческими работами здесь

Какой бейсик быстрее
У меня на компьютере есть 4 бейсика: QBasic 1.1, 4.5, 7.1 и Turbo Basic 1.0 Всем им была дана...

Какой запрос быстрее
Предположим есть 2 хранимые процедуры для проверки (по какому либо полю), существует ли...

Какой запрос быстрее?
пока что это не приоритетная моя задача но все же хотелось бы услишать мнение знающих людей) как...

Какой процессор быстрее?
i5 650 разогнанный до 3.8 Ггц или i5 760 до 3 Ггц?

Наверх