1. Информатика
  2. Вычеслить и вывести

Вычеслить и вывести на экран площадь круга и длину окружности зная радиус( в паскаль)

denpop648p08mew denpop648p08mew    2   02.10.2019 05:50    0

Ответы
адинаева адинаева  09.10.2020 11:07

program circle;

var S,P,r:real;

const i = Pi;

begin

 writeln('Введите радиус окружности');

 readln(r);

 S:=i*(r*r);

 P:=2*i*r;

 writeln('Площадь = ',S,', длина = ',P);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Nesty111111 Nesty111111  17.03.2021 15:15
Дан программный код. Определи, какая синтаксическая ошибкадопущена в нем.1 х=int(input( х= ))2 y=53 if x 3 :12=x+y y5 elif x 3 and x 100:6 z=x*y7 elif X=100 and 500:2=x*2*у9...
anastasia559 anastasia559  17.03.2021 15:16
Определите значение переменной А после выполнения фрагмента алгоритма представленного блок - схема А:=0 В:=12 В 4 В:=В/2 А:=В-2...
hhhttt1520 hhhttt1520  23.06.2020 15:21
Промоделировать взлет двухступенчатой ракеты массой M. Ракета летит время t1 c первой работающей ступенью и t2 со второй. Сила тяги первой ступени – F1, второй – F2. Ракета...
Мelissa205 Мelissa205  23.06.2020 15:22
Решить тест по ассемблеру в течении 40 - 50 минут (можно и с интернета, главное чтоб сделали правильно, прст времени на то и другое нет, ещё программу писать)...
ananimka456 ananimka456  23.06.2020 15:03
написать программу в паскале. Составьте программу вычисления выражения (гиперболический синус) y = sh х = x + x3 / 3! + x5 / 5! + ... + x2n+1 / (2n +1)!...
Gowher20061 Gowher20061  24.06.2020 15:31
Составление линейных программ с использованием операторов ввода-вывода составьте на языке паскаль последние отдаю ​...
влад2319 влад2319  15.03.2019 15:00
Умаляю еше раз информационый обьем одного сообшения состовляет 0,5 кб , а другого-128 бит. во сколько раз информациооный обьем первого сообшения больше обьема второго?...
Arra1234566 Arra1234566  27.12.2020 17:33
Написать на python программу которая будет искать и печатать цифры в веденной строке по плану. Вот план: 1. Через raw_input узнаю у пользователя символы. 2. Через специальную...
okszav okszav  27.12.2020 17:33
Информационное сообщение записано при символьного алфавита. Каков информационный вес каждого символа этого сообщения ответ:...
zlatinovaangel zlatinovaangel  27.12.2020 17:32
На паскале 1 Создать массив случайных чисел A[1..15]. Найти произведение и количество элементов этого массива, которые меньше 5 и стоят на нечетных местах в массиве. 2...

Популярные вопросы