Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
NastyaMeow05
28.07.2022 22:07 •
Информатика
Напишите программы на языке паскаль .составить программу для расчета z=2.5sin x^2+x^3 число х вводится с клавиатуры. 2.задать 3 натуральных числа . являются ли их сумма четным числом 3.напечатать все делители натурального числа n. заранее
Ответ:
FSoxGy
05.10.2020 12:57
//1
begin
var x:=readreal('Введите x: ');
write ('z=', 2.5*sin(sqr(x))+x*x*x);
end.
//2
begin
write (((readinteger('Введите 3 нат. числа: ')+readinteger+readinteger) mod 2)=0);
end.
//3
begin
var n:=readinteger ('Введите n: ');
for var i:=1 to n do
if (n mod i)=0 then print (i);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
бомба15682
29.08.2020 07:42
1)составьте программу обмена в массиве b(n) первого отрицательного и максимального элементов. 2)составьте программу вставки в массив a(n) пятого элемента, равного 8....
zuhraafokinazuhra
17.09.2021 02:46
Дима нарисовал изображение с графического редактора paint. укажите 3 инструмента, с которых может быть создано данное изображение....
liyanborisova
17.09.2021 02:46
Устройство для преобразования информации (5 букв) 4-ая буква е...
paschprudnikov
14.12.2022 04:31
1.дано натуральное чисто n. вычислить: s=1+1/3+1/5+1/7+/2n+1...
mumin2013
19.05.2023 06:39
Какие функции могут быть у антивирусных программ...
lllgglll
29.11.2022 07:32
1.Каковы функции инструментов управления пространством в программе SketchUp? 2.Какова роль инструмента Следуй за мной в построении Конуса и сферы?...
7376373
11.06.2021 02:54
Яким було ставлення до ассоль та її родини мешканців каперни? «пурпурові вітрила». 40...
NezNeika
11.06.2021 02:54
Сделайте синтаксический разбор предлоожения - все дети надели заранее сшитые маскарадные костюмы....
violettakot01
11.06.2021 02:54
Іть будь ласка , потрібно написати лист для лесі українки . не з і!...
minikolp12344
11.06.2021 02:54
M× 8,7=50,46 7,511 ÷ а =3,7 8,35 - 1,1 р=7,58 2,32 ÷ х + 2,1=5 5/9 +(х - 2/9)= 2/5 (4,5 - х) × 5,8=8,7 4,8у + 3,7у = 11,9 1)одно число на 1,4 больше другого, а их сумма...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var x:=readreal('Введите x: ');
write ('z=', 2.5*sin(sqr(x))+x*x*x);
end.
//2
begin
write (((readinteger('Введите 3 нат. числа: ')+readinteger+readinteger) mod 2)=0);
end.
//3
begin
var n:=readinteger ('Введите n: ');
for var i:=1 to n do
if (n mod i)=0 then print (i);
end.