Помогите пожалуйста решить в Паскале. Для четырех произвольных чмсел,введеных с клавиатуры,выведите на экран соответствующие результаты.Если все
5-9 класс
|
числа не превышают 30,то выведите их удвоенное произведение.Если последнее число четно,то выведите произведение первых двух чисел,уменьшенное в 10 раз.Если выполняются одновременно два перечисленных выше условия,то выведите эти числа без изменения.Иначе,выведите разность первого и последнего чисел.Составьте соответствующие отладочные примеры и проверьте работу каждой програмы.
var
a, b, c, d : integer;
begin
read (a, b, c, d);
if (a <= 30) and (b <= 30) and (c <= 30) and (d <= 30) and (d mod 2 = 0) then
write (a, ' ', b, ' ', c, ' ', d)
else if (a <= 30) and (b <= 30) and (c <= 30) and (d <= 30) then
write (2 * a * b * c * d)
else if d mod 2 = 0 then
write (a * b / 10)
else write (a - d);
end.
Другие вопросы из категории
Читайте также
результаты.:
· Если первое из них отрицательно, а второе вдвое больше третьего, то выведите среднее арифметическое всех четырех чисел.
· Если произведение этих чисел больше их суммы, то выведите эти сумму и произведение.
· Если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих чисел, их произведение и сумму
· Иначе, выведите удвоенные значения этих чисел
Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран
соответствующие результаты.
·
· Если второе и четвертое числа отрицательны, то выведите их произведение.
· Если первое и третье числа больше 10, то выведите все четыре числа, увеличив их в десять раз
· Если выполняются одновременно два перечисленных выше условия, то выведите эти четыре числа без изменения.
· Иначе, выведите все четыре числа, уменьшив их в десять раз.
Составьте соответствующие отладочные примеры и проверьте работу каждой программы.
выведите все четыре числа без изменения. Если сумма всех чисел не больше 80, то выведите только два первых числа. Если выполняется одновременно два перечисленных выше условия, то выведите только два последних числа.Иначе, выведите все четыре числа,увеличев их на 5
1. Чему равны значения переменных r, a, d?
a:=5; b:=20; c:=-7;
d:=2.5;
r := a+(4*b+c)*d;
a:= a+4;
d:=a*7;
2. В пяти тестовых опросах мальчик получил оценки. Составьте программу, которая определит среднее значение оценок, полученных мальчиком в пяти опросах.
3*. Задача. «Покупка в магазине»
Человек делает в магазине покупки. Определите сколько денег у него останется после покупки в магазине перчаток стоимостью А руб., портфеля стоимостью B руб. и галстука стоимостью D руб. Все исходные данные задаются с клавиатуры.
Исходные данные.
a — стоимость перчаток;
b — стоимость портфеля;
d — стоимость галстука;
dengi — количество денег у человека.
Все эти переменные будут вещественного типа.
Результат.
ostatok — количество денег, которое останется у человек (вещественный тип).
Метод решения.
ostatok = dengi – a – b – d
Написать программу, реализующую данную задачу
Помогите пожалуйсто решить очень срочно!!!!!!