Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Vanek041005
05.10.2022 16:08 •
Информатика
Вычислить значения синусов в интервале от 0 до 6.283, шаг 0,31415. всё надо сделать в паскале. если не сложно объясните
Показать ответ
Ответ:
Перрсик88
07.10.2020 05:54
Var
x: real;
begin
x := 0;
while x <= 6.283 do
begin
writeln('F(',x:0:1,') = ',sin(x)/x:0:2);
x := x + 0.31415;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Дамирка2288
10.11.2021 03:08
Язык паскаль) ввести двумерный массив a 4×3. определить в нём произведение тех элементов, чей модуль лежит вне диапазона [1; 5]....
Алёнажж
23.06.2021 00:37
Уисполнителя калькулятор, которым присвоены номера: 1) прибавить 1 2) умножить на 3 запишите порядок команд в программе получения из числа 1 число 45. содержащие не более 5 команд...
KarinaKostolevskaya
23.06.2021 00:37
Ввести с клавиатуры 2 числа в интервале от 0 до 999. вывести их на экран столбиком в виде, удобном для сложения или умножения. то есть первый разряд первого числа под первым разрядом...
Sashabolsun04
23.06.2021 00:37
Составить программу, которая запрашивает у пользователя два целых числа и выводит квадрат суммы (a+b)2и сумму квадратов a2+b2 ‘этих чисел. пример работы программы: введите два...
gona1
25.01.2023 06:34
Вычисли сумму s=∑k=1nk+1k2+1, если значение n вводит пользователь. Если n=7, то вывод на экран (ответ округли до сотых...
крымнаш
30.03.2023 00:24
ответить на 5 вопросов...
kruglov428
11.11.2021 15:15
Найди информационный объём (в битах) растрового изображения размером 22 x 22 пикселя, если известно, что используется палитра из 256 цветов...
Kaska322
05.05.2023 16:01
Записать условными операторами. а) if a 13 then c: =1; if b 15 then d: =2; if a =13 then c: =2; if b =15 then d: =4; 2.записать в виде сложного условия. a...
valeralera200
28.08.2021 10:37
Сформализации условия и применение законов логики решите известно следующее по сдаче экзамена по если виктор не сдал экзамен то сергей не сдал если алексей не сдал экзамен или...
marinka02jkjk
02.11.2022 20:41
Что колеблется , когда вы говорите или поете?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
x: real;
begin
x := 0;
while x <= 6.283 do
begin
writeln('F(',x:0:1,') = ',sin(x)/x:0:2);
x := x + 0.31415;
end;
end.