Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Dragon4ik341234
24.07.2020 10:56 •
Информатика
Из железной полосы длиной l метров нужно изготовить обруч. на соединение концов уходит d метров полосы. разработать схему алгоритма для вычисления радиуса r обруча. протестировать алгоритм для а) l=5.8, d=0.2, б) l=3.25, d=0.1
Показать ответ
Ответ:
Azimhan2017
11.06.2020 20:48
function r(l, d: real):real;
begin
result:=sqrt((l-d)/pi);
end;
var l, d: real;
begin
l:=5.8;
d:=0.2;
writeln('L = ', l, ' D = ', d, ' r = ', r(l, d));
l:=3.25; d:=0.1;
writeln('L = ', l, ' D = ', d, ' r = ', r(l, d));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
DisasterYt
06.02.2022 05:39
Почему информационная ёмкость жёстких магнитных дисков во много раз больше, чем гибких?...
sanimatronic
19.04.2023 02:49
Памогите Температура воздуха на Северном полюсе:Знаковое\беззнаковое пердставление Время:Знаковое\беззнаковое Размер диогонали монитора:Знаковое\беззнаковое Количество...
bigzaur777
15.07.2020 16:41
Задача. Дано число а. Если оно является положительным то прибавить к нему 1, в противном случае вычесть из него два. Вывести полученное число. (тест, блок-схема, программа...
shargorod81
25.11.2021 18:16
34 замените эквиваленты соответствующими модальными глаголами 1. are you able to drive a car? 2. the weather was bad and we had to stay at home. 3. they were allowed to...
Nier
25.11.2021 18:16
Сүйіспеншілік сөзіне бестармақ тәсілімен бес жолды өлең жазу керек болып тұр көмектеседі...
justnastya1
25.11.2021 18:16
Придумайте предложение со словом поражение...
kaltaeva98
25.11.2021 18:16
Учебник авторы а.ю купалова, а.п. ермеева ,т.м пахнова №256 слово вырезал над ни стоит цифра 6 она обозначает слово или словосочетание для офорграфического разбора узнать...
tatyanamasenko
17.08.2021 04:21
Определить падеж существительных буратино шлёпнулся на пол около ножки стула...
yanabutko
17.08.2021 04:21
Назовите простые делители числа 188...
Hennessy777
17.08.2021 04:21
Начертите угол nok, отметьте точку а внутри угла, точку в вне угла и точку с на стороне угла. назовите стороны и вершину данного угла....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
function r(l, d: real):real;
begin
result:=sqrt((l-d)/pi);
end;
var l, d: real;
begin
l:=5.8;
d:=0.2;
writeln('L = ', l, ' D = ', d, ' r = ', r(l, d));
l:=3.25; d:=0.1;
writeln('L = ', l, ' D = ', d, ' r = ', r(l, d));
end.