Вопрос по информатике:
составить программу вычисляющее наибольшее из 3 заданных чисел(паскаль)
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 11.04.2015 02:20
- Информатика
- remove_red_eye 3175
- thumb_up 20
Ответы и объяснения 2
var
a,b,c:integer;
writeln('a,b,c'); readln(a,b,c);
if (a>b) and (a>c) then writeln(a);
if (b>a) and (b>c) then writeln(b);
if (c>b) and (c>a) then writeln(c);
end;
можно через один if.
- 12.04.2015 08:25
- thumb_up 44
var
a, b, c, m : integer;
begin
read (a, b, c);
m := a;
if b > m then m := b;
if c > m then m := c;
writeln (m);
end.
ps так корректнее, потому что в первом ответе не учтено равенство чисел.
- 12.04.2015 22:47
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.