Паскаль. написать программу при процедуры, которая по известному радиусу возвращает в основную программу значения площади круга и длины окружности. входящие данные: r (радиус); выходящие данные: s (площадь), l (длина окружности)
105
368
Ответы на вопрос:
Program primer; const pi=3.14; procedure sandl(r: integer; var s,l: real); begin s: =pi*power(r,2); l: =2*r*pi; end; var r: integer; s,l: real; begin readln(r); sandl(r,s,l); writeln(trunc(s),' ',trunc(l)); end.abc pascal
program step;
var
x,y,a: integer;
uses crt;
begin
clrscr;
write('введите a='); readln(a);
writeln('возвел в 3 степень, 3 степень=', a*a*a);
writeln('возвел в 6 степень, 6 степень=', a*a*a*a*a*a);
writeln('возвожу в 9 степень, 9 степень=', a*a*a*a*a*a*a*a*a)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
mix4212.04.2020 01:04
-
Ильяна11129.10.2020 00:04
-
ffghh1gfdd19.06.2021 05:39
-
pourkur1111oz10kt03.08.2020 14:57
-
katya899810.07.2020 07:46
-
Ирина889109.09.2022 19:36
-
ayubabdulmanapov19.09.2020 08:38
-
ксюха121204.01.2021 13:54
-
artemgavrev28.02.2021 07:17
-
murat12122106.09.2021 13:46
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.