Пожаловаться
- 12.09.2018 22:43
- Информатика
- remove_red_eye 9811
- thumb_up 48
Ответы и объяснения 2
var
a,b: real;
begin
write('Vvedite kateti a, b: ');
readln(a,b);
writeln('P = ',a + b + sqrt(a*a+b*b):0:2);
readln;
end.
a,b: real;
begin
write('Vvedite kateti a, b: ');
readln(a,b);
writeln('P = ',a + b + sqrt(a*a+b*b):0:2);
readln;
end.
Пожаловаться
- 13.09.2018 00:50
- thumb_up 12
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadReal2('Введите через пробел величины катетов: ');
Writeln('Периметр равен ',a+b+Sqrt(a*a+b*b):0:5)
end.
Пример
Введите через пробел величины катетов: 6.3 5.42
Периметр равен 20.03062
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadReal2('Введите через пробел величины катетов: ');
Writeln('Периметр равен ',a+b+Sqrt(a*a+b*b):0:5)
end.
Пример
Введите через пробел величины катетов: 6.3 5.42
Периметр равен 20.03062
Пожаловаться
- 14.09.2018 04:09
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы