Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vladsunygin
03.09.2022 02:58 •
Информатика
Из железной полосы длиной l метров нужно изготовить обруч. на соединение концов уходит d метров полосы. разработать схему алгоритма для вычисления радиуса r обруча. протестировать алгоритм для а) l=5.8, d=0.2, б) l=3.25, d=0.1
Показать ответ
Ответ:
lisa301
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 оценок)
Популярные вопросы: Информатика
kristinazmataeva
11.03.2021 04:57
5 точек заданы своими координатами. Создать массив из расстояний от этих точек до начала координат . Вычисление расстояния оформить в процедуре ( обязательно )...
Ррррр5о
13.04.2023 05:44
Подумайте,почему сейчас не используются такие носители информации. как папирус и пергамент,а бумага используется до сих пор...
медвежонок41
20.02.2022 08:51
Сообщение информационный объем которого равен 15 кбайт занимает 4 страницы по 64 строки в каждой из которых записано по 60 символов сколько символов в алфавите языка на котором...
МарысяДэн
29.03.2022 09:02
Напишите программу на Python 10.11 Создайте матрицу (список из вложенных списков) размера N x N (фиксируются в программе), заполненную случайными целыми числами...
zejnabnasibova
18.12.2022 04:34
Очень надо! Только правильно отвечайте ...
vazirkhanovalia
08.07.2022 11:54
1. Дополни предложения, в окошки напиши (скопируй) недостающие слова: (шрифт, алфавитном порядке, специальные окошки, кнопки изменения стиля, pt, дюйма, названия шрифтов, кнопки...
RomanBilyan
08.03.2023 15:31
вычислите значение вещественной переменной c при a=2 и b=3: а) c:=a+1/3 б) c:=a+4/2*3+6 в) c:=a+4/2*3...
nikgali
21.11.2022 16:39
Складіть речення. до тексту якої вправи вони можуть бути початком? запишіть. підкресліть дієслова. у, стояли, лісі,засніжені,смереки,галявину,на,вийшло,оленятко,помітило,врно,стіг,сіна....
Soto350
02.05.2022 17:57
Синоним до слова лукавство та ярмо з префиксом не...
сердянечок
02.05.2022 17:57
Наведіть приклади коротких и повних нестягнених форм прикметників.у якому стилі мовлення здебільшого використовуємо такі прикметники?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.