М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
polinaa6
polinaa6
03.07.2020 13:28 •  Информатика

Записать формулу на языке программирования Pascal

👇
Ответ:
Oleg12875
Oleg12875
03.07.2020

Поскольку Pascal не делает различий в регистре символов и условие видно неполностью, то считается, что a=A и b=B. Если требовалось иное, напишите об этом.

var a,b,x,y: double;

begin

writeln('Введите a');

readln(A);

writeln('Введите b');

readln(b);

writeln('Введите x');

readln(x);

y:=1/3*

(sqrt(sin(a*x)+cos(b*x)))*

(sqrt(exp(a*x*x+b*x+1.1)));

writeln('ответ: ',y);

end.

4,4(20 оценок)
Открыть все ответы
Ответ:
N1ke1N1kev1ch
N1ke1N1kev1ch
03.07.2020
Требования безопасности перед началом работы:
1. Запрещено входить в кабинет в верхней одежде, головных уборах, с громоздкими предметами и едой
2. Запрещено входить в кабинет информатики в грязной обуви без бахил или без сменной обуви
3. Запрещается шуметь, громко разговаривать и отвлекать других учащихся
4. Запрещено бегать и прыгать, самовольно передвигаться по кабинету
5. Перед началом занятий все личные мобильные устройства учащихся (телефон, плеер и т.п.) должны быть выключены
6. Разрешается работать только на том компьютере, который выделен на занятие
7. Перед началом работы учащийся обязан осмотреть рабочее место и свой компьютер на предмет отсутствия видимых повреждений оборудования
8. Запрещается выключать или включать оборудование без разрешения преподавателя
9. Напряжение в сети кабинета включается и выключается только преподавателем

Требования безопасности во время работы:
1. С техникой обращаться бережно: не стучать по мониторам, не стучать мышкой о стол, не стучать по клавишам клавиатуры
2. При возникновении неполадок: появлении изменений в функционировании аппаратуры, самопроизвольного её отключения необходимо немедленно прекратить работу и сообщить об этом преподавателю
3. Не пытаться исправить неполадки в оборудовании самостоятельно
4. Выполнять за компьютером только те действия, которые говорит преподаватель
5. Контролировать расстояние до экрана и правильную осанку
6. Не допускать работы на максимальной яркости экрана дисплея
7. В случае возникновения нештатных ситуаций сохранять спокойствие и чётко следовать указаниям преподавателя.
Запрещается:
1. Эксплуатировать неисправную технику
2. При включённом напряжении сети отключать, подключать кабели, соединяющие различные устройства компьютера
3. Работать с открытыми кожухами устройств компьютера
4. Касаться экрана дисплея, тыльной стороны дисплея, разъёмов, соединительных кабелей, токоведущих частей аппаратуры
5. Касаться автоматов защиты, пускателей, устройств сигнализации
6. Во время работы касаться труб, батарей
7. Самостоятельно устранять неисправность работы клавиатуры
8. Нажимать на клавиши с усилием или допускать резкие удары
9. Пользоваться каким-либо предметом при нажатии на клавиши
10. Передвигать системный блок, дисплей или стол, на котором они стоят
11. Загромождать проходы в кабинете сумками, портфелями, стульями
12. Брать сумки, портфели за рабочее место у компьютера
13. Брать с собой в класс верхнюю одежду и загромождать ею кабинет
14. Быстро передвигаться по кабинету
15. Класть какие-либо предметы на системный блок, дисплей, клавиатуру.
16. Работать грязными, влажными руками, во влажной одежде
17. Работать при недостаточном освещении
18. Работать за дисплеем дольше положенного времени
4,4(41 оценок)
Ответ:
Annaanna2002
Annaanna2002
03.07.2020
        '     1)Напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b задаются пользователем).    
   
Dim a As Integer
Dim b As Integer 
Dim i As Integer   

a = InputBox("Введите а") 
b = InputBox("Введите b")
   
Dim msg As String     
msg = ""   
     
For i = a To b     
       msg = msg &  3 в степени " & i & " равно " & 3 ^ i & vbCrLf   
 Next   

MsgBox(msg)

2)Найти все делители числа 1204.   

Dim i As Integer       
Dim msg As String   
msg = ""     

For i = 1 To 1204 
          If 1204 Mod i = 0 Then     
                  msg = msg & "Число " & i & " является делителем 1204." & vbCrLf                  End If   
Next 
  MsgBox(msg)
4,6(50 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ