Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
iumpovavika85
02.06.2021 12:06 •
Информатика
Паскаль. создать программу которая высчитывает площадь круга; радиус вводится пользователем. программа завершается когда r < 0
Показать ответ
Ответ:
ksusha020504
03.10.2020 04:07
Кароч вот порога на нахождение радиуса
program z1;
var r:integer;
var s:real;
begin
read(r);
s:=3.14×(sqr(r);
write (s);
end
0,0
(0 оценок)
Популярные вопросы: Информатика
ЛесяКисс
12.01.2022 14:01
Дана строка. Замените в этой строке все появления буквы h на букву H, кроме второго и последнего вхождения....
хомячок48
03.07.2020 17:43
Нужно в программе Кумир сделать какой-нибудь простой узор. И скрин всего экрана !!...
Вадим98913
15.09.2020 22:04
У середовищі програмування розробіть проєкт у якому у вікні головної форми буде побудована стовпчастадіаграма яка демонструє співідношення між числами (15, 50, 70, 25, 10,...
andreevochir20
06.11.2022 16:23
Пройти лабиринт и закрасить только там, где две стороны с алгоритма пока...
sayfulloevo
18.01.2021 21:31
НЕ БЕРИТЕ ИЗ ГГДДЗЗ ТАМ НЕ ПРАВИЛЬНО Определите,что получится в результате выполнения в графическом редакторе следующей последовательности действий 1)Установите основной...
danilworld
15.10.2020 22:06
2. В информационной модели жилого дома, представленной в виде чертежа (общий вид), отражается его: 1) структура; 3) цвет; 2) стоимость; 4) надежность. 3. Информационной моделью...
LOLLLAada
04.05.2020 06:38
Какое наибольшее натуральное четырёхзначное число нужно присвоить переменной n, чтобы после выполнения программы на экране отобразилось число 25? n = ? s = 0 while n 0: p...
danilasen34
05.09.2020 23:21
Найдите алгоритм ) Я не шарю...
dydina785312690
02.04.2020 23:14
Дан список. Какой индекс имеет последний элемент списка A? A(12)*7 A(10)*9...
карина2029
09.08.2021 21:50
Дан фрагмент программы: if cost 1000: print( Скидка 0% ) elif cost 2000: print( Скидка 2% ) elif cost 5000: print( Скидка 5% ) else: print( Скидка 10% ) Какую скидку можно...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program z1;
var r:integer;
var s:real;
begin
read(r);
s:=3.14×(sqr(r);
write (s);
end