Пусть элементами круга являются радиус (первый элемент), диаметр (второй элемент) и длина окружности (третий элемент).

224

428

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

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

данил1234758888

Другие предметы

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

program sample;
label 1;
var
el:integer;
r,d,l,s:real;
begin
s:=0;
1: writeln("введите номер элемента:");
readln(el);
case el of
  1: begin writeln("введите радиус круга:"); readln(r); s:=3.14*sqr(r) end;
  2: begin writeln("введите диаметр:"); readln(d); s:=3.14*sqr(d/2) end;
  3: begin writeln("введите длину окружности:"); readln(l); s:={ф-ла нахождения площади через длину окр.} end;
  else: goto 1;
end;
writeln(s);
end.

kolyamusin01

Другие предметы

4,8(98 оценок)

var r,d,l,s:real;
    c:char;
begin
repeat
clrscr;
writeln('Определить площадь круга:');
writeln('по 1-радиусу, 2-диаметру, 3-длине окружности');
writeln('Другие клавиши - выход.');
readln(c);
case c of
'1':begin
    write('Введите радиус r=');
    readln(r);
    writeln('Площадь=',pi*r*r:0:2);
    readln
    end;
'2':begin
    write('Введите диаметр d=');
    readln(d);
    writeln('Площадь=',pi*d*d/4:0:2);
    readln
    end;
'3':begin
    write('Введите длину окружности l=');
    readln(l);
    writeln('Площадь=',sqr(l/2/pi)*pi:0:2);
    readln
    end;
else exit;
end;
until not(c in ['1'..'3']);
end.

alenakoslova

Другие предметы

4,7(5 оценок)

ответ:

техогляд

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Другие предметы

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.