Предмет: Литература, автор: solovdenis

О чем рассказывает ся в книге изящные мастера

Ответы

Автор ответа: знания1122
0
о скульптуре мастера
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Математика, автор: 310rus
СРОЧНО РЕШИТЕ ДАЮ 25 БАЛЛОВ ТОЛЬКО ПОД ЦИФРОЙ 1.
5 лет назад
Предмет: Українська мова, автор: Аноним
Доповнити вірш влучними словами
Я люблю _________ солов'їну
5 лет назад
Предмет: Физика, автор: venerakuznecova89
Определите вес человека массой 50 кг в начале движения вниз лифта, достигшего скорости 10м/с за 5с
срочно нужно ​
5 лет назад
Предмет: Алгебра, автор: altanaolzoeva
Ребята , пожалуйста помогите мне с алгеброй
9 лет назад
Предмет: Информатика, автор: anatol4i
Что нужно добавить,чтобы работало правильно
program minandmax;
var a,b,c,d,e:integer;
begin
writeln ('введите числа');
readln (a,b,c,d,e);
if (a>b) and (a>c) and (a>d) and (a>e)and (a:=max)then
writeln ('число', a,' наибольшее')
else
if (b>a) and (b>c) and (b>d) and (b>e)then
writeln ('число', b,' наибольшее')
else
if (c>b) and (c>a) and (c>d) and (c>e)then
writeln ('число', c,' наибольшее')
else
if (d>b) and (d>c) and (d>a) and (d>e)then
writeln ('число', d,' наибольшее')
else
if (e>b) and (e>c) and (e>d) and (e>a)then
writeln ('число', e,' наибольшее');
if (a writeln ('число', a,' наименьшее')
else
if (b writeln ('число', b,' наименьшее')
else
if (c writeln ('число', c,' наименьшее')
else
if (d writeln ('число', d,' наименьшее')
else
if (e writeln ('число', e,' наименьшее')
end.


здесь при вводе одинаковых чисел минимальных или максимальных не выводится результат. ЧТо изменить ?
9 лет назад