Взависимости от номера (n) типа фигуры, организовать ввод необходимых данных и вычислить при к = 1 - площадь прямоугольника, при к = 2 - площадь параллелограмма, при к = 3 - площадь трапеции 1/2(a+b)h. в последнем случае напечатать: является ли трапеция параллелограммом или ромбом.

223

392

Посмотреть ответы 2

Ответы на вопрос:

Леееера1

Информатика

4,4(41 оценок)

Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin write('введите 1-прямоугольник, 2-параллелограмм, 3-трапеция: '); var n: =readinteger; case n of 1: begin writeln('прямоугольник'); var (a,b): =readreal2('введите длины сторон: '); writeln('площадь равна ',a*b) end; 2: begin writeln('параллелограмм'); var (a,h): =readreal2('введите длину основания и высоту: '); writeln('площадь равна ',a*h) end; 3: begin writeln('трапеция'); var (a,b,h): =readreal3('введите длины оснований и высоту: '); writeln('площадь равна ',(a+b)/2*h); end; else writeln('введен неверный номер') end end. по поводу " является ли трапеция параллелограммом или ромбом". это некорректный вопрос в информатике. споры о том, является ли трапеция частным случаем параллелограмма или ромба так и не закончены. поскольку копирование из интернет материалов сюда запрещено, а также запрещены ссылки на внешние источники, отсылаю заинтересованных лиц к материалу, который называется "параллелограммная война". это о военном конфликте между и францией, возникший из-за разногласий на научной конференции в геттингенском университете. ну а нам войны не нужны, поэтому если автор вопроса четко сформулирует критерий, по которому можно ответить на заданный им подвопрос, можно будет добавить это в программу.