Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 15.11.2011
Сообщений: 23
1

Вычисление площадей различных геометрических фигур

28.11.2011, 19:42. Показов 1545. Ответов 2
Метки нет (Все метки)

Составить программу вычисления площадей различных геометрических фигур
Изображения
 
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.11.2011, 19:42
Ответы с готовыми решениями:

Создайте приложение для расчета различных геометрических фигур. Получите уведомление о том, что площадь формы рассчитана
Создайте приложение для расчета различных геометрических фигур. Получите уведомление о том, что...

Построение геометрических фигур
Здравствуйте, уважаемые господа программеры. Не буду прикидываться опытным кодером, впервые...

Написать программу по нахождению площадей фигур
Написать программу по нахождению площадей фигур. Надо сделать так, что бы в ней было несколько...

Вычислить параметры геометрических фигур
помагите мне сделать контрольную работу 1)Составте блок схему алгоритма и программу вычесления...

2
32 / 32 / 30
Регистрация: 25.11.2011
Сообщений: 43
28.11.2011, 20:23 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

вот прога пользуйся
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
program pr;
uses crt;
var n:byte;
var a,b,h,r,s:real;
begin
clrscr;
writeln('площадь прямоугольника-1');
writeln('площадь треугольника-2');
writeln('площадь трапеции-3');
writeln('площадь круга-4');
writeln('площадь сектора круга-5');
read(n);
case n of
1:begin
writeln('введите a и b');
read(a,b);
s:=a*b;
end;
2:begin
writeln('введите a и h');
read(a,h);
s:=a*h/2;
end;
3:begin
writeln('введите a,b и h');
read(a,b,h);
s:=(a+b)*h/2;
end;
4:begin
writeln('введите r');
read(r);
s:=r*r*pi;
end;
5:begin
writeln('введите r и a');
read(r,a);
s:=r*r*pi*(a/360);
end;
end;
writeln('площадь равна ',s);
readln;
end.
1
0 / 0 / 0
Регистрация: 15.11.2011
Сообщений: 23
28.11.2011, 20:24  [ТС] 3
crachka, спасибо большое)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.11.2011, 20:24

Из простейших геометрических фигур нарисовать рыбку
1. Из простейших геометрических фигур нарисовать рыбку. 2. Изобразить на экране две окружности,...

Графика Pascal ABC: Рисование геометрических фигур мышкой
Само рисование я сделал, но получается вот такая штука: Как от этого можно избавиться? P.S....

Вычисление площади, периметра геометрических фигур
Почему у меня ошибка program n_666; const pi=3.14; var a, b, h, s, c, p, k, z, d, r: real;...

Создание геометрических фигур в паскале.
Здравствуйте. Я только начинаю работать в Паскале, поэтому не удивляйтесь столь глупому вопросу....


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru