Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 977 ответов!

Напишите программу в паскаль для решения следующей задачи: для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие

10-11 класс

результаты. Если первое из них отрицательно, а второе вдвое больше третьего, то выведите среднее арифметическое всех четырех чисел. Если произведение этих четырех чисел больше их суммы, то выведите эти сумму и произведение. Если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих чисел, их произведение и сумму. Иначе, выведите удвоенные значения этих чисел.

8381954 11 апр. 2014 г., 7:57:12 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Mijgan2014
11 апр. 2014 г., 10:42:28 (10 лет назад)

var a,b,c,d:real;
begin
readln(a,b,c,d);i
f (a<0) and (b/c=2) then
begin
writeln((a+b+c+d)/4);
if a*b*c*b>a+b+c+d then 
begin
writeln(a*b*c*b);
writeln(a+b+c+d);
end;
end
else
writeln(a*2,' ',b*2,' ',c*2,' ',d*2);
end.

Ответить

Другие вопросы из категории

В чем ошибка? var x:real; fuction x1(a,b:integer):real; begin x1:=a+sqrt(b)/b+a; end; begin x:=

x1(15+8)/8+15 + x1(6+12)/12+6 + x1(7+21)/21+7;

writeln('x=', x:6:2);

end.

Общее имя: город,конкретное имя:?
Составьте Paskal-программу решение следующей задачи:

Задан массив A(n).Найти сумму и количество чётных отрицательных элементов этого массива

11. Вася скачивает материалы для монтажа видеоролика длительностью N секунд, с использованием протокола torrent. Особенностью этого протокола является то,

что параллельно со скачиванием разбитого на небольшие фрагменты файла происходит раздача скачанных фрагментов. Торрент клиент настроен таким образом, что максимальная скорость скачивания 15 МБайт/с, а максимальная скорость раздачи – 5 МБайт/с.

Материалы включают в себя:
Несжатые изображения кадров, размером 1920*1080 точек с глубиной цвета 16 бит из расчета 18 изображений на секунду воспроизведения.
Несжатую звуковую дорожку длительностью N секунд, включающую 48 каналов, каждый из которых оцифрован с частотой дискретизации 192000 Гц и 4096 уровнями квантования.
Никакой другой информации, кроме описанной, в скачиваемых материалах нет.
Определите N - длительность видеоролика в секундах при условии, что раздача фрагментов началась одновременно с началом скачивания, и за время скачивания материалов было роздано 8100 МБайт. Скачивание и раздача все время осуществлялась на максимальных скоростях. Примечание: 1МБайт=2^20 байт. В ответе укажите значение N.

Читайте также

паскаль написать программу Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если сумма

первых двух чисел четна, то выведите эту сумму. Если сумма третьего и четвертого чисел четна и отрицательна, то выведите все четыре числа без изменения. Если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих четырех чисел. Иначе, выведите суммы двух первых и двух последних чисел.

Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты.

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

Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если все числа не превышают 30, то выведите их

удвоенное произведение. Если последнее число четно, то выведите произведение первых двух чисел, уменьшенное в 10 раз. Если выполняются одновременно 2 условия, то выведите эти числа без изменения. Иначе, выведите разность первого и последнего чисел.
Решить нужно в С или С++
Заранее спасибо!!!

Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если все числа не превышают 30, то выведите их

удвоенное произведение. Если последнее число четно, то выведите произведение первых двух чисел, уменьшенное в 10 раз.
Решить нужно на среде С или С++
Заранее спасибо.

Для пяти произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если первое, второе и пятое числа отрицательны, то

выведите их произведение. Если третье и четвёртое числа больше100, то выведите среднее арифметическое всех пяти чисел. Если выполняются одновременно два перечисленных выше условия, то выведите на экран все пять чисел без изменения. Иначе, выведите третье и пятое числа, увеличив их в два раза.



Вы находитесь на странице вопроса "Напишите программу в паскаль для решения следующей задачи: для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.