Вопрос по информатике:
Выдает ошибку Операция > не может быть применена к типам boolean и integer
Program qq;
var a,b,c,max,min,med : integer;
begin
writeln ('введите три числа');
read (a,b,c);
if c>b>a
then begin
max := c;
med := b;
min := a;
End;
if b>a>c
then begin
max := b;
med := a;
min := c;
End;
if a>c>b
then begin
max := a;
med := c;
min := b;
End;
writeln ('наибольшее число', max);
writeln ('среднее число', med);
writeln ('наименьшее число', min);
End.
- 25.06.2018 18:55
- Информатика
- remove_red_eye 16184
- thumb_up 42
Ответы и объяснения 1
Ну так правильно пишет , нельзя писать if b>a>c
then begin , пишется правильно так if (c>b) and (b>a)then begin , вообщем вот держи ;
Program qq;var a,b,c,max,min,med : longint;beginwriteln ('введите три числа');read (a,b,c);if (c>b) and (b>a)then beginmax := c;med := b;min := a;End;if (b>a) and (a>c)then beginmax := b;med := a;min := c;End;if (a>c) and (c>b)then beginmax := a;med := c;min := b;End;writeln ('наибольшее число', max);writeln ('среднее число', med); writeln ('наименьшее число', min);End.
- 26.06.2018 07:28
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.