Информатика | 5 - 9 классы
Pascal!
Даны основания и высота р / б трапеции.
Найти ее периметр!
Даны основания и высота равнобедренной трапеции?
Даны основания и высота равнобедренной трапеции.
Найти её периметр.
МНОГО БАЛЛОВ?
МНОГО БАЛЛОВ!
Помогите решить задачу, задача по программированию (pascal abc)сборник златопольского задача 1.
44 даны стороны прямоугольника, найти его периметр и длину диагонали.
Дан радиус окружности?
Дан радиус окружности.
Найти её диаметр.
(код Pascal).
Даны два ненулевых числа?
Даны два ненулевых числа.
Найти их сумму, разность, произведение и частное их квадратов.
Язык Pascal.
Pascal, Дан целочисленный массив из 30 элементов?
Pascal, Дан целочисленный массив из 30 элементов.
Как найти сумму элементов после первого положительного?
(PASCAL) Дан двухмерный массив целых чисел?
(PASCAL) Дан двухмерный массив целых чисел.
Найти столбец с максимальной суммой элементов.
Turbo Pascal даны действительные числа х, у найти минимальное из них?
Turbo Pascal даны действительные числа х, у найти минимальное из них.
Площадь трапеции на языке ABC pascal?
Площадь трапеции на языке ABC pascal.
Найти площадь равнобочной трапеции с основаниями a и b и углом a при большем основании?
Найти площадь равнобочной трапеции с основаниями a и b и углом a при большем основании.
Дана равнобедренная трапеция, боковая сторона А, одно из оснований В, дан периметр?
Дана равнобедренная трапеция, боковая сторона А, одно из оснований В, дан периметр.
Найти второе основание и вывести на экран
на Паскале.
Вопрос Pascal?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 5 - 9 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.
Пробуйте :
var a, b, h : integer ; p : real ;
begin
write ('Введите длину большего основания : ') ; read(a) ;
write ('Введите длину меньшего основания : ') ; read(b) ;
write ('Введите длину высоты : ') ; read(h) ;
p : = a + b + 2 * sqrt(sqr(h) + sqr(a - b) / 4) ;
writeln ('Периметр = ', p) ;
end.