83

Дан радиус окружности. Найдите длину окружности и площадь круга

makedonckij 14 апреля 2023

Дан радиус окружности. Найдите длину окружности и площадь круга. Ооочень срочно плииз информатика

категория: информатика

73

Program Circle; Uses crt; const pi=3,14; var C,r,S: real; begin clrscr; write ('Введите радиус: '); readln (r); C=pi*2*r; S=2*pi*(sqr (r); writeln ('Площад круга равна: ',S); writeln ('Длина окружности равна: ',C); readkey; end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...