Помогите написать программу на языке Паскаль.
10-11 класс
|
var
a, b, c:real;
begin
write('Введите путь пройденный за первую десятидневку '); readln(a);
write('Введите путь пройденный за вторую десятидневку '); readln(b);
write('Введите путь пройденный за третью десятидневку '); readln(c);
if a > b then
if a > c then
writeln('Наибольший путь пройден за первую десятидневку ')
else
writeln('Наибольший путь пройден за третью десятидневку ')
else
if b > c then
writeln('Наибольший путь пройден за вторую десятидневку ')
else
writeln('Наибольший путь пройден за третью десятидневку ');
end.
Другие вопросы из категории
То есть всего должно быть 3 вывода. Помогите пожалуйста!!!
координат. Побудувати два зафарбованих трикутники, симетричних відносно початку координат. Вершини трикутників з'єднати пунктирними лініями.
2. Зобразити сонце із променями, довжини яких вибираються випадковим чином з інтервалу (20, 80).
3. Побудувати графік функції крапками, вибравши розташування координатних осей на екрані й масштаб: y= (х2 -4х+3)2 ;
4. Побудувати криві по їхніх рівняннях, заданим у полярних координатах:
ρ= a/φ (а> 0);
5. Побудуйте стовпчасту діаграму, що відображає результати останньої сесії в кожній із груп. Дані про середню оцінку в кожній групі зберігаються в масиві О[ 1...10] .
Читайте также
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
б)y=x^15
Постараться использовать минимальное количество дополнительных переменных.
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
13.
Нужно написать программу на цикле с предусловием, на Паскале.
клавиатуры. На экран вывести результат вычислений в виде таблицы. 1 Блок-схема алгоритма программы, выполненная с использованием графических средств редактора WORD; 2 Текст программы; 3 Результаты выполнения (копия экрана). (3x+2)^2- sqrt3x/(3x)^2 a 5;b 7; h 0,1
1,Найти
наименьший элемент массива (начиная с k-го) и
его порядковый номер. Поменять местами k-тый и найденный минимальный элемент.