Вопрос по информатике:
Записать в Паскаль программу которая должна запрашивать у пользователя значения углов треугольника и определять, может ли он существовать. Если треугольник с такими углами не существует, программа должна предложить пользователю ввести новые значения. Если треугольник с введенными значениями углов существует, программа должна вывести на экран сообщение об этом и завершить работу
Пожалуйста, помогите!
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 13.09.2018 06:55
- Информатика
- remove_red_eye 12507
- thumb_up 33
Ответы и объяснения 1
Uses Crt;
var alpha, beta , gamma, Sum :real;
begin
ClrScr;
Sum:=0;
repeat
WriteLn(' Ведите углы треугольника (в градусах): ');
Write (' alpha = '); ReadLn(alpha);
Write (' beta = '); ReadLn(beta);
Write (' gamma = '); ReadLn(gamma);
Sum:=alpha+beta+gamma;
If (Sum=180) then WriteLn (' Существует! ')
else
Writeln (' Не существует... ');
WriteLn;
until Sum=180;
WriteLn(' Спасибо за работу!');
ReadLn;
end.
- 14.09.2018 00:59
- thumb_up 4
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.