Автор НаДюШка ******** задал вопрос в разделе ВУЗы, Колледжи
Помогите пожалуйста!!!решить задачу через Паскаль:Напишите прог.поиска большего из четырех чисел и получил лучший ответ
Ответ от Anatolij_61 Grischencko[гуру]
{ Наибольшее из 4-рех. }
PROGRAM ZAD_4;
USES Crt;
Var A1, A2, A3, A4 : Integer;
BEGIN
ClrScr;
{ Заносим значения в A1, ..A4. }
Write('Введите 1-е число A1 = '); ReadLn(A1);
Write('Введите 2-е число A2 = '); ReadLn(A2);
Write('Введите 3-е число A3 = '); ReadLn(A3);
Write('Введите 4-е число A4 = '); ReadLn(A4);
{ Определяем наибольшее из 4-рех. }
If ((A4 > A1) AND (A4 > A2) AND (A4 > A3)) Then WriteLn('Наибольшее из 4-рех A4 = ', A4);
If ((A3 > A1) AND (A3 > A2) AND (A3 > A4)) Then WriteLn('Наибольшее из 4-рех A3 = ', A3);
If ((A2 > A1) AND (A2 > A3) AND (A2 > A4)) Then WriteLn('Наибольшее из 4-рех A2 = ', A2);
If ((A1 > A2) AND (A1 > A3) AND (A1 > A4)) Then WriteLn('Наибольшее из 4-рех A1 = ', A1);
ReadKey;
END.
Источник: Из головы
да не за что... Вот значит как мы решаем задачи на свой отчет....
что такое искронедающий щебень? дайте хоть какой-нибудь нормативный документ где сказано про него?
...это щебень известняковых пород.... называется "Даломитовый"...
Существует большое
подробнее...
На какое время можно включать ионизатор воздуха в комнате 12 кв. м.?
Параметры и характеристики ионизаторов воздуха.
Или как выбрать ионизатор воздуха (Люстру
подробнее...