Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
30 ноября 2022 02:08
938
Написать программу нахождения суммы большего и меньшего из 3-х чисел.для "паскаль"
1
ответ
Var a,b,c,min,max,s: integer;
begin
write('Ведите числo а '); readln(a);
min:=a; max:=a;
write('Ведите числo b '); readln(b);
if b<min then min:=b;
if b>max then max:=b;
write('Ведите числo c '); readln(c);
if c<min then min:=c;
if c>max then max:=c;
writeln('Сумма min + max = ',min+max);
end.
begin
write('Ведите числo а '); readln(a);
min:=a; max:=a;
write('Ведите числo b '); readln(b);
if b<min then min:=b;
if b>max then max:=b;
write('Ведите числo c '); readln(c);
if c<min then min:=c;
if c>max then max:=c;
writeln('Сумма min + max = ',min+max);
end.
0
·
Хороший ответ
2 декабря 2022 02:08
Остались вопросы?
Еще вопросы по категории Информатика
Толя, Петя, Саша и Ваня заняли первые четыре места в велокроссе. На вопрос, какие места они заняли, мальчики ответили: 1) Толя не занял ни первое,...
Отгадайте слово , обозначающее некое понятие информатики . 1)Секретная , научная , ложная , техническая , массовая . 2)Текстовый , графический , сист...
помогите пожалуйста с тестом!!!!!!)) 1 что относится к средствам мультимедиа: а) звук, текст, графика, изображения. б) звук, колонки, графика. в) аним...
Какие преимущества обеспечивают табличные информационные модели по сравнению со словесными описаниями Приведите примеры...
максимальная скорость передачи данных в локальной сети 100 мега бит в секунду,сколько страниц можно передать в секунду, если одна страница текста соде...