Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 21.05.2017 13:42
- Информатика
- remove_red_eye 10935
- thumb_up 16
Ответы и объяснения 2
begin
readln(a);
readln(b);
readln(c);
if a*a+b*b:=c*c then
begin
d:=a+b+c;
writeln(d);
end
else
begin
d:=a*b*c;
end
end.
- 23.05.2017 00:26
- thumb_up 26
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=ReadReal3('Введите через пробел a,b,c:');
if a*a+b*b=c*c then Writeln(a+b+c)
else Writeln(Abs(a*b*c))
end.
Примеры
Введите через пробел a,b,c: 3 -4 7.11
85.32
Введите через пробел a,b,c: -3 4 5
6
- 23.05.2017 04:58
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.