Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Ови11
07.10.2022 06:26 •
Информатика
Паскаль. создать программу которая высчитывает площадь круга; радиус вводится пользователем. программа завершается когда r < 0
Показать ответ
Ответ:
Marinkasmirnova
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 оценок)
Популярные вопросы: Информатика
bolatbekaliya
28.11.2020 12:37
На странице 40 строк по 65 символов, сколько страниц поместятся на сd диске с емкостью 4,7 гб?...
zari21
28.11.2020 12:37
Сравните числа (укажите, какое из них больше): 73 (10) или 1100101 (2) 64 (10) или 1000001 (2) 37 (10) или 100101 (2) в скобках указана система счисления...
снежана1281
11.01.2022 07:32
Какой знак используется при вычислении следующих операций? // целая часть от деления % простое деление остаток от ** деления возведение в Степень...
Luiza3030499
25.03.2022 06:51
Организуйте цикл for, счетчик которого изменяется от 10 до 25 с шагом 3(i=i+3) и вывод результата на экран. С++...
Крайз
19.04.2021 02:28
Два задания по информатике, написать программы решения примеров на Паскаль....
fmksa2006
17.01.2023 13:49
Какие из предложенных структур в блок-схеме содержат блок выбора? Следование Цикл ДО Цикл ПОКА Ветвление...
КеК5169
16.03.2023 11:37
С клавиатуры вводится рост 20 учащихся 8 класса. Определить средний рост учащихся 8 класса....
maksim9182
23.04.2023 12:18
Как изменялось программное обеспечение с развитием компьютеров?...
Гулбахар
07.02.2023 08:42
Дано отношение: A∈b .Имя данного отношения: f R b ∈...
Pinkaktus
07.05.2020 20:27
1) Ergänzen Sie das Partizip 1) dividieren 9) sagen 17) feiern 2) legen 10) hoffen 18) suchen 3) decken 11) reisen 19) malen 4) bestellen 12) erklären 20) bemalen...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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