сервис вопросов и ответовнайти максимальное из четырех чисел .составить программу на языке паскаль
10-11 класс|
|
Маргуня
18 апр. 2013 г., 18:01:21 (11 лет назад)
Александра2121
18 апр. 2013 г., 19:01:27 (11 лет назад)
VAR
A,B,C,D:integer;
Begin
WriteLn('введите числа A,B,C,D);
ReadLn(A,B,C,D);
if (A=B) and (B=C) and (C=D) then
WriteLn('все числа равны');
else
if (A=B) or (B=C) or (C=D) or (A=D) then
Begin
Write ('только');
WritweLn('два три числа равны');
end
else
WriteLn('все числа разные');
end.
Ответить
Другие вопросы из категории
1.Какое колличество информации несет в себе аналогичное сообщение содержащее в себе 155 символов
2.Сообщение объёмом в 1125 байт занимает три страницы по 25 строк , по 60 символов в строке.Какова мощность использованного алфавита.
помогите пожалуйста!!!срочно нужно!!! заранее спасибо!
дана последовательность целых положительных чисел.найти произведение только тех из них которые больше заданного числа m.если таких чисел нет,то
выдать сообщение об этом Паскаль!!! можно с обьяснениями плиз))
В двоичной системе счисления, используя прямой и обратный двоичные
машинные коды, выполнить сложение двух произвольных двузначных чисел,
заданных в десятичной системе счисления. Полученный результат перевести
в десятичную систему счисления (т .е. сделать проверку). Рассмотреть
следующие случаи:
- оба числа положительные;
- первое число положительное, второе – отрицательное;
- первое число отрицательное, второе – положительное;
- оба числа отрицательные.
Читайте также
Составить программу на языке паскаль
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
Составить программу на языке Паскаль: 1)Для массива K из 12 вещественных чисел определить сколько элементов массива меньше 0. 2)В массиве М из 10 целых
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
ДАМ 22 ПУНКТА СРОЧНО
СОСТАВИТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ
данны два числа a и b.составить программу для вычисления среднего арифметического кубоы этих чисел
Составить программу на языке Паскаль.Определите, кратно ли трем значение целочисленной переменной X. Если это имеет место, то выведите на печать
значение Х с соответствующим сообщением, если нет, то выведите на печать "нет".
Помогите, пожалуйста, очень нужно)
Вы находитесь на странице вопроса "найти максимальное из четырех чисел .составить программу на языке паскаль", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.