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

Составить программу в pascalabc с применением цикла 50 ​

👇
Ответ:
yastremskayaal
yastremskayaal
06.11.2020

program abc;

var n,x: integer;

s: real;

begin

s:=0;

x:=1;

readln(n);

while x<=n do

begin

s:=S+(exp(2*ln(sin(x)))+cos(sqrt(x)));

x:=x+1;

end;

writeln(s);

end.

4,7(95 оценок)
Открыть все ответы
Ответ:
ЛизаЕ
ЛизаЕ
06.11.2020
Математи́ческая моде́ль — математическое представлениереальности[1], один из вариантов модели, как системы, исследование которой позволяет получать информацию о некоторой другой системе.

Процесс построения и изучения математических моделей называется математическим моделированием.

Все естественные и общественныенауки, использующие математический аппарат, по сути, занимаются математическим моделированием: заменяют объект исследования его математической моделью и затем изучают последнюю. Связь математической модели с  с цепочки гипотез, идеализаций и упрощений. С математических методов описывается, как правило, идеальный объект, построенный на этапе содержательного моделирования[⇨].
4,4(5 оценок)
Ответ:
sofiya13031
sofiya13031
06.11.2020
Const heigth = 10
Const width = 10

Sub Ìàêðîñ1()
    Dim Sum(heigth - 1, width - 1)
    Dim Product(heigth - 1, width - 1)
    
    For i = 0 To heigth - 1
        For j = 0 To width - 1
            Sum(i, j) = i + j
            Product(i, j) = i * j
        Next j
    Next i
    
    Call Show(Sum, 0, 0)
    Call Show(Product, 0, 12)
End Sub

Sub Show(ByRef m, dx, dy)
    For i = 0 To heigth - 1
        For j = 0 To width - 1
            ActiveSheet.Cells(dx + i + 1, dy + j + 1).Value = Hex(m(i, j))
        Next j
    Next i
End Sub
4,6(7 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ