Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
саша10041
16.09.2021 12:39 •
Информатика
1. составить программу вычисления значения функции на отрезке (-10; 10). результат представить в виде таблицы, первый столбец которой значение аргумента, а второй - значение функции. f=x-sin(x)
Показать ответ
Ответ:
NooraXx
01.10.2020 18:03
Const
x_max = 10;
x_min = -10;
x_step = 0.5;
var
x, y: real;
begin
x := x_min;
writeln('x':10, 'y':10);
repeat
writeln(x:10:2, (x - sin(x)):10:2);
x := x + x_step;
until x > x_max;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ikoooo43
08.01.2021 23:51
Скорость передачи данных через adsl соединение равна 512 000 бит/с.передача файла заняла 8 секунд.определите размер файла в кбайтах...
isheh09ow2mth
09.07.2022 02:22
Заменить одну букву в название городов: ,уха,туча, название реки: волна новое слово: лапка,зубы,песок,галка,клин,свет,полено...
Гений1611
14.08.2022 04:17
Выход из лабиринта Урок 1 установите соответствие движение вперед пока расстояние между роботом объктом больше 50 движение вперед пока расстояние между роботом объектом меньше 50...
Vladamira55
10.10.2022 23:57
11. Найдите значения выражений: 1) (1 v 1) v (1 v 0);2) ((( v0) v 1) 1);3) ((1 v 0) & (1 & 1)) & (0 v 1);...
YAGA009
03.10.2020 23:52
1. вводить числа с клавиатуры,пока не будет введено число кратное 5. 2. вводить числа с клавиатуры, выводить ответ, до каждого числа четное оно или нет, пока не будет введен 0....
цццрпппр1
07.03.2023 07:59
Сотруднику фирмы продиктовали по телефону IP-адрес компьютера. Молодой человек адрес записал, но не поставил разделительные точки: 100768114. Восстанови исходный IP-адрес....
fhtyf
18.05.2023 12:53
3. Написать программы в текстовом документе: А) Дано целое число. Если оно является неотрицательным, то увеличить его в 3 раза, а иначе прибавить к нему 15. Вывести полученное число....
psossl
15.03.2022 10:01
На фото 5 во и тут еще 2. 7 во Выделите значения так, чтобы программа печатала значение true. Var t: Boolean i: integer; begin t:= [true /false]; i:=0; repeat t:= [not t / false];...
Дрррррррррр
31.03.2020 09:55
1. Переведите целые числа из десятичной системы счисления в двоичную систему. Числа: 854 и 662. 2. Переведите в десятичную систему двоичные числа. Числа: 110 и 10101 3. Выполните...
vadim1154
07.06.2021 18:51
1. Мартышка собиралась съесть 30 бананов, но съела на 20% больше. Сколько бананов съела мартышка? 2. Товар стоймостью 250 рублей уценён на 10% больше. Определите новую стоимость...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
x_max = 10;
x_min = -10;
x_step = 0.5;
var
x, y: real;
begin
x := x_min;
writeln('x':10, 'y':10);
repeat
writeln(x:10:2, (x - sin(x)):10:2);
x := x + x_step;
until x > x_max;
end.