Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
MorficTV
27.04.2020 12:24 •
Информатика
Вычислите значения функции w=y^2+1/y^2-1 на отрезке [0; 0,5] с шагом 0,1 (составить блок-схему алгоритма и программу для программирования pascal.abc
Показать ответ
Ответ:
123ЭщКеРе123
05.10.2020 19:59
Var
Y:real;
Begin
Y:=0;
Repeat
WriteLn('W(',Y,') = ',(Y*Y+1)/(Y*Y-1));
Y:=Y+0.1;
Until Y>0.5
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Марьванна567
12.11.2022 17:52
На языке программирования в Python ...
001Карина11111
22.10.2021 13:20
Номер нужно через час....
K0Tiko
04.02.2021 15:14
Соңғы нәтиже жиынтығындағы жолдар саны шектейтін блок...
dadfxhg
04.02.2020 04:24
Название командного блока в котором находится команда 6б...
Unyrfnch
07.06.2021 21:27
1. Отметьте все правильные высказывания про облачные хранилища данных. данные хранятся на серверах в Интернете можно хранить секретные данные всегда быстрый доступ к...
baikolepus
16.09.2021 20:08
Число 54 300 записали в нормализованной форме. Определите мантиссу (m) и порядок (n) данного числа. а) m=5,43 n=4б) m=0,543 n=5в) m=5 n=0,543г) m=0,543 n=-4...
міхан
15.10.2020 20:04
Какие из перечисленных функций отображены кнопками управления состоянием окна? A) свернуть, копировать, закрыть B) вырезать, копировать, вставить C) свернуть, развернуть,...
копытирина
03.04.2021 15:45
При кодировке текстового сообщения, состоящего из 40 символов, потребовалось 320 бит, а при дальнейшем изменении кодировки на другую его итоговый объем составил 40 байт....
salamov1213
17.09.2021 18:25
2. В эту папку скопируйте из других папок по одному фалау 1. На рабочем столе создайте папку «Мои документы». 3. Эти файлы, каждый в отдельности, заархивируйте первым...
Yulichka0829
09.03.2023 12:38
Исследование интернет вещей в мире...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Y:real;
Begin
Y:=0;
Repeat
WriteLn('W(',Y,') = ',(Y*Y+1)/(Y*Y-1));
Y:=Y+0.1;
Until Y>0.5
End.