Составить программу вычисляющую площадь геометрической фигуры тип фигуры определяется символом

Составить программку, вычисляющую площадь геометрической фигуры. Тип фигуры определяется эмблемой (с): О окружность, T равнобедренный прямоугольный треугольник и K квадрат. Целое число, вводимое вслед за эмблемой определяет подходящий элемент для вычисления площади (для окружности это радиус, для треугольника длина катета, для квадрата длина стороны).

  • Василий Леви
  • Информатика
  • 2019-01-30 18:16:40
  • 18
  • 1

Лидия Дуланова 2019-01-30 18:23:55

Var
S, X, a, b, R: Real;
C: String;
Begin
WriteLn(‘Chto budem vichislat’);
ReadLn(C);
if C = ‘O’ then begin
WriteLn(‘Radius’);
ReadLn(R);
S:= Pi*sqr(R);
end;
if C:= ‘T’ then begin
WriteLn(‘Vvedite 1 katet);
ReadLn(a);
WriteLn(‘Vvedite 2 katet);
ReadLn(b);
S:= 1/2 * a * b;
end;
if C:= ‘K’ then begin
WriteLn(‘Vvedite 1 katet);
ReadLn(a);
S:= sqr(a);
end;
WriteLn(‘Ploshad = ‘);

90% неправильно определяют тип фигуры #мода #стиль #полезныесоветы #модныесоветы #образы #фигура


ReadLn(S);
end.

Viktorija Prosuncova 2019-01-30 18:29:32
Спасибо громадное!
, оставишь ответ?
Похожие вопросы
Вопросы ответы

У вас классный сайт! Продаёте? Добрый день, меня зовут Николай — я владелец нескольких интернет — проектов. Ищу новые

Николай Александрович Карфополитский

«Статистика приведена за 2005 год» В 2005 году не было стольких возможностей для получения работы не требующей вышки(да

Источник: obrazovalka.com

Составить программу, вычисляющую площадь геометрической фигуры. Тип фигуры определяется символом (с): О – окружность, T – равнобедренный прямоугольный треугольник и K – квадрат. Целое число, вводимое вслед за символом определяет соответствующий элемент для вычисления площади (для окружности это радиус, для треугольника – длина катета, для квадрата – длина стороны).

Var
S, X, a, b, R: Real;
C: String;
Begin
WriteLn(Chto budem vichislat);
ReadLn(C);
if C = O then begin
WriteLn(Radius);
ReadLn(R);
S:= Pi*sqr(R);
end;
if C:= T then begin
WriteLn(Vvedite 1 katet);
ReadLn(a);
WriteLn(Vvedite 2 katet);
ReadLn(b);
S:= 1/2 * a * b;
end;
if C:= K then begin

Читайте также:
Система искусственного интеллекта примеры программ

Площадь фигуры


WriteLn(Vvedite 1 katet);
ReadLn(a);
S:= sqr(a);
end;
WriteLn(Ploshad = );
ReadLn(S);
end.

Источник: reshaika.com

Составить программу вычисляющую площадь геометрической фигуры тип фигуры определяется символом

Школьнику.com

Опубликовано 13.06.2017 по предмету Информатика от Гость >> Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

  • Алгебра
  • Математика
  • Русский язык
  • Українська мова
  • Информатика
  • Геометрия
  • Химия
  • Физика
  • Экономика
  • Право
  • Английский язык
  • География
  • Биология
  • Другие предметы
  • Обществознание
  • История
  • Литература
  • Українська література
  • Беларуская мова
  • Қазақ тiлi

Показать ещё

Источник: www.shkolniku.com

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru