Как найти площадь трапеции на паскале - Исправление недочетов и поиск решений вместе с Examum.ru

Ирина Анатольев

0 / 0 / 0

Регистрация: 02.12.2011

Сообщений: 6

вычисление площади трапеции

22.02.2012, 07:35. Показов 73102. Ответов 1

Метки нет (Все метки)

ребят помогите пожалуйста, решила задачу Составьте программу для вычисления площади трапеции. а она у меня не идет. подскажите где ошибка?

Pascal

program p2; 
var 
a,b,h,s:real; 
begin 
writeln ('Vvedite osnovanie); 
read (a); 
writeln ('Vvedite drugoe osnovanie); 
read (b); 
writeln ('Vvedite visotu); 
read (h); 
s:=(a+b)*h/2 
writeln ('Ploshad' trapecii ravna ',s); 
readln; 
end.

заранее спасибо

alexcoder

1778 / 756 / 153

Регистрация: 03.06.2009

Сообщений: 5,874

22.02.2012, 10:31

Вообще это ветка для с/с++, а не паскаля.
Почти все правильно, единственное что вижу, нет точки с запятой и кавычек.

Pascal

program p2;
var
a,b,h,s:real;
begin
writeln ('Vvedite osnovanie ');
read (a);
writeln ('Vvedite drugoe osnovanie ');
read (b);
writeln ('Vvedite visotu ');
read (h);
s:=(a+b)*h/2;
writeln ('Ploshad trapecii ravna ',s);
readln;
end.

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

22.02.2012, 10:31

Помогаю со студенческими работами здесь

Вычисление площади кольца
Составить программу вычисления площади кольца по знахапия внутреннего и внешнего радиусов,…

Вычисление площади поверхности комнаты
Написать программу, учитывая необходимые типы данных, для вычисления площади поверхности стен…

Вычисление площади кольца. Оптимизировать код
program plKOLC;
uses crt;
const pi=3.141592653;
var R1,R2,S1,S2:real;
Begin…

Вычисление площади, периметра геометрических фигур
Почему у меня ошибка

program n_666;
const pi=3.14;
var a, b, h, s, c, p, k, z, d, r: real;…

вычисление площади треугольника по координатам его концов
Напишите функцию вычисляющую площадь треугольника по координатам трех его вершин.
заранее мы не…

Даны основания равнобочной трапеции и величина угла при большем основании . Найти площадь трапеции
Даны основания равнобочной трапеции и величина угла при большем основании . Найти площадь трапеции

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Источник

var
a, b, h, s : Real;
begin

Writeln(‘Введите основания трапеции:’);
Write(‘Основание a = ‘); Readln(a);
Write(‘Основание b = ‘); Readln(b);

Writeln(#10#13 + ‘Введите высоту трапеции: ‘);
Write(‘Высота h = ‘); Readln(h);

s := (a + b) * h / 2;

Writeln(#10#13 + ‘S трапеции = ‘, s:0:1);
end.

Источник

ПОМОГИТЕ

Написать программу вычисления площади равнобедренной трапеции.

Значения основания и боковой стороны вводятся с клавиатуры.

(Паскаль).

На этой странице сайта, в категории Информатика размещен ответ на вопрос
ПОМОГИТЕНаписать программу вычисления площади равнобедренной трапеции?. По уровню сложности вопрос рассчитан на учащихся
5 — 9 классов. Чтобы получить дополнительную информацию по
интересующей теме, воспользуйтесь автоматическим поиском в этой же категории,
чтобы ознакомиться с ответами на похожие вопросы. В верхней части страницы
расположена кнопка, с помощью которой можно сформулировать новый вопрос,
который наиболее полно отвечает критериям поиска. Удобный интерфейс
позволяет обсудить интересующую тему с посетителями в комментариях.

Источник

Найти площадь равнобедренной трапеции с основаниями

7.06.2020

Найти площадь равнобедренной трапеции с основаниями a и b и углом α при большем основании a.

Вспомним формулу площади равнобедренной трапеции через основания и угол при большем основании:

Программа для вычисления площади:

program z_7;
var a, b, alpha, S: real;
begin
  write('a = ');  read(a);
  write('b = ');  read(b);
  write('alpha = ');  read(alpha);
  alpha:=(alpha*pi)/180;
  S:=(1/2)*(sqr(b)-sqr(a))*tan(alpha);
  writeln('S = ', S);
end.

Текст задачи:

Информатика. 10 класс. Базовый уровень. (Семакин И. Г., Хеннер Е. К., Шеина Т. Ю.)
Работа 3.1, Уровень 1, Задача №7

Автор:

Источник

Составить программу на языке паскаль нохождения площади трапеции

Uses crt;
vara,b,h,S:real;
begin
writeln(‘Поиск площади трапеции через основание и высоту’);
writeln();
write(‘Введи основание а = ‘);
readln(a);
writeln();
write(‘Введи основание b = ‘);
readln(b);
writeln();
write(‘Введи высоту h = ‘);
readln(h);
S:=h*(a+b)/2;
writeln(‘Ответ: ‘,S);
end.

Комментариев (0)

Ваш ответ

Источник