< >

программа для нахождения наименьшего и наибольшего из трех чисел в паскале

Ответы

Ответ дал: Ghost22
0

Program Pr1;
uses crt;
var a,b,c,max:integer;
begin
clrscr;
readln(a,b,c);
if a>b then max:=a
else max:=b;
if c>max then max:=c;
writeln(max);
end.

Похожие вопросы
Другие предметы
2 года назад
чем обусловоно влзникновние чрезвычайных ситуацией техногенного характера
Английский язык
2 года назад
ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!                                                                                     Заполни пропуски. see -_______   ________ - went__________   ___________-had            
Математика
7 лет назад
Задание первое решите даю 20 балов
Математика
7 лет назад
в гирлянде 44 флажка красного, синего,зеленого и желтого цветов. Красных, синих и зеленых флажков вместе 37 штук, синих, зеленых и желтых-29 штук, красных, зеленых и желтых-32 шт. Сколько флажков
Геометрия
10 лет назад
в прямоугольном треугольнике катет , лежащий против угла 60 градусов, равен 3корень3 см. найдите две другие стороны этого треугольника и его площадь.
Математика
10 лет назад
ТРИ МАШИНЫ ВЫЕЗЖАЮТ С ЭЛЕВАТОРА В 8 Ч УТРА  В РАЗНЫХ НАПРАВЛЕНИЯХ .НА ЭЛЕВАТОР ПЕРВАЯ МАШИНА ВОЗРАЩАЕТСЯ ЧЕРЕЗ КАЖДЫЙ 3 Ч ВТОРАЯ ЧЕРЕЗ 4 Ч ТРЕТЬЯ ЧЕРЕЗ 6 Ч .В КАКОМ ЧАСУ МАШИНЫ ВСТРЕТИМСЯ НА
История
10 лет назад
Выберите имена греческих богов; а)Осирис г)Исида ж)Амон-Ра к)Юпитер н)Посейдон б)Зевс д)Гера з)Марс л)Дионис о)Афродита в)Аид е)Гефест и)Афина м)Гор п)Деметра
Алгебра
10 лет назад
tgx=-5,необходимо решить уравнение