Решение задачи №6 из главы 9 - Поиск максимума из трех чисел
Primary tabs
Задача №6 из главы 9
Пользователь вводит три числа, найдите из них максимальное.
ПРИМЕЧАНИЕ: здесь вам понадобятся вложенные if-блоки.
var a, b, c: integer; // секция объявления переменных
begin // начало тела программы
writeln('vvedite cislo A');
readln(a);
writeln('vvedite cislo B');
readln(b);
writeln('vvedite cislo C');
readln(c);
if (a > b) and (a > c) then //если A больше В и С
begin
writeln('Naibolshhee chislo A = ', a) // То выводим А
end
else begin
if (b > a) and (b > c) then // вложенный оператор if ; если B больше A и С
writeln('Naibolshhee chislo B = ', b) // То выводим B
else
writeln('Naibolshhee chislo C = ', c); //Иначе выводим C
end;
readln(); // удерживаем консоль
end. // конец тела программы
- Log in to post comments
- 21212 reads
vedro-compota
Fri, 06/29/2018 - 12:54
Permalink
решение засчитано.
решение засчитано. форматровать вложенный блок нужно на то же число пробелов (/табов), что и основной блок.
_____________
матфак вгу и остальная классика =)
vedro-compota
Mon, 07/09/2018 - 14:19
Permalink
приведите альтернативный вариант
В решении по смыслу вложенные блоки не используются, так как вы через and сразу сцепляете все условия в длинные выражения.
Переделайте решение (в ответном комментарии) по схеме:
-- чтобы остальной код был на месте многоточий.
Т.е. фактически вместо многоточий должен располагаться поиск "максимума из двух".
_____________
матфак вгу и остальная классика =)
gani84
Tue, 07/17/2018 - 21:38
Permalink
var a, b, c: integer; //
var a, b, c: integer; // секция объявления переменных begin // начало тела программы writeln('vvedite cislo A'); readln(a); writeln('vvedite cislo B'); readln(b); writeln('vvedite cislo C'); readln(c); if (a > b) then //если A больше В и С if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a); // То выводим А if (b > a) then // если B больше A и С if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе выводим C readln(); // удерживаем консоль end. // конец тела программыvedro-compota
Tue, 08/14/2018 - 10:05
Permalink
сцепите два основных if-a
сцепите два основных if-a через else, чтобы это была единая конструкция.
_____________
матфак вгу и остальная классика =)
vedro-compota
Sun, 08/26/2018 - 12:25
Permalink
if (a > b) then //если A
if (a > b) then //если A больше В и С if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a); // То выводим А if (b > a) then // если B больше A и С if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе выводим C-- для одинаковых а и b не работает (пояснение на видео).
Правильно будет работать так:
if (a > b) then //если A больше В и С begin if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a) // То выводим А end else if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе в_____________
матфак вгу и остальная классика =)
gani84
Sat, 09/15/2018 - 20:43
Permalink
А где предпоследней ветке
А где предпоследней ветке
else if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В <blockquote>{ где b > a рядом с b > c или не надо его указывать?}</blockquote> else writeln('Naibolshhee chislo C = ', c); //Иначе вgani84
Sat, 09/15/2018 - 20:36
Permalink
Вот про эту сцепку тоже не
Вот про эту сцепку тоже не сказано. Начинающему сложно понять смысл вопроса!!! Больше теории надо!!!
vedro-compota
Sat, 09/15/2018 - 21:29
Permalink
Вот про эту сцепку тоже не
про какую сцепку. Пишите все замечания и вопросы в полном виде с применением цитирования.
_____________
матфак вгу и остальная классика =)
gani84
Sun, 09/16/2018 - 08:03
Permalink
приведите альтернативный
Я про это в самом начале после "решение засчитано".
gani84
Tue, 09/18/2018 - 07:23
Permalink
Про сцепку надо в теории описать я например я не понял
Я исправил там условия не хватало if (b > a) then
if (a > b) then //если A больше В и С begin if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a) // То выводим А end else if (b > c) then // вкладываем второе условие begin if (b > a) then writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе в end;vedro-compota
Tue, 09/25/2018 - 20:41
Permalink
не верно
1) не идеальное форматирование
2) есть begin и end которые можно не использовать
-- исправьте хотя бы один пункт.
_____________
матфак вгу и остальная классика =)
gani84
Wed, 09/26/2018 - 11:37
Permalink
Это я не правильно написал
if (a > b) then //если A больше В и С begin if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a) // То выводим А end else if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе в-----------------------------------------------------------------
А не
if (a > b) then //если A больше В и С begin if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a) // То выводим А end else if (b > c) then // вкладываем второе условие begin if (b > a) then {Это Лишнее так как указано выше if (a > b) then begin if (a > c) then writeln('Naibolshhee chislo A = ', a) ---------------------------------------- То тогда лишнее if (b > a) then } writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе в end;vedro-compota
Sun, 09/30/2018 - 17:16
Permalink
неправильно
if (a > b) then //если A больше В и С begin if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a) // То выводим А end else if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе в-- это не сработает для чисел 4, 3 и 5 -- поймите почему и исправьте код.
_____________
матфак вгу и остальная классика =)
gani84
Sun, 10/07/2018 - 10:57
Permalink
Исправил
var a, b, c: integer; // секция объявления переменных begin // начало тела программы writeln('vvedite cislo A'); readln(a); writeln('vvedite cislo B'); readln(b); writeln('vvedite cislo C'); readln(c); if (a > b) then //если A больше В и С begin if (a > c) then // вкладываем второе условие writeln('Naibolshhee chislo A = ', a) // То выводим А else writeln('Naibolshhee chislo C = ', c) end else if (b > c) then // вкладываем второе условие writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе в readln(); end.vedro-compota
Thu, 01/24/2019 - 13:17
Permalink
решение верное, но не верен
решение верное, но не верен комментарий к строке:
-- проверяется меньше, чем написано в комментарии.
_____________
матфак вгу и остальная классика =)
gani84
Fri, 01/25/2019 - 06:49
Permalink
var a, b, c: integer; //
var a, b, c: integer; // секция объявления переменных begin // начало тела программы writeln('vvedite cislo A'); readln(a); writeln('vvedite cislo B'); readln(b); writeln('vvedite cislo C'); readln(c); if (a > b) then //если A больше В begin if (a > c) then // если А больше С writeln('Naibolshhee chislo A = ', a) // То выводим А else writeln('Naibolshhee chislo C = ', c) // Иначе выводим С end else if (b > c) then // если B больше С writeln('Naibolshhee chislo B = ', b) // То выводим В else writeln('Naibolshhee chislo C = ', c); //Иначе выводим С readln(); end. end.vedro-compota
Mon, 03/25/2019 - 22:41
Permalink
решение засчитано.
решение засчитано.
_____________
матфак вгу и остальная классика =)