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

Составить программу вычисления значений функции y = f (x) на промежутке ( a, b) с шагом h (на языке basic):
f (x)=cos (x2) + 5/x3 - 2
a=0
b=2
h=0,12
quick basic или visual basic.

👇
Ответ:
QwertyMia
QwertyMia
20.05.2021

Function func32771914() As String

Dim i As Single, S As String

For i = 0.12 To 1.88 Step 0.12

S = S & Cos(i ^ 2) + 5 / i ^ 3 - 2 & ";"

Next

func32771914 = S

End Function

Excel VBA

4,5(83 оценок)
Открыть все ответы
Ответ:
mammedova75
mammedova75
20.05.2021
var
  l,a,b:integer;
  s: string;
begin
write('Введите строку: ');
readln(s);
l:=length(s);
writeln('L=',l);
if l>6 then
   begin
   a:=pos('(',s);
   b:=pos(')',s);
   if (a>0) and (b>0) then writeln(copy(s,a+1,b-a-1));
   if (a=0) and (b>0) then writeln('Скобка не открыта');
   if (a>0) and (b=0) then writeln('Скобка не закрыта');
   if (a=0) and (b=0) then writeln('Текста в скобках нет');
  end;
end.

var
  n,i,k:integer;
  s,t: string;
begin
write('Введите строку: ');
readln(s);
t:=s;
repeat
  i:=pos(' ',t);
  delete(t,1,i);
  until i=0;
k:=length(t);
for i:=1 to k do
  if t[i]='k' then n:=n+1;
writeln('Кол-во букв k: ',n);
end.
4,6(32 оценок)
Ответ:
atamanova91
atamanova91
20.05.2021

--- C# 7.3 ---

using System;

using System.Collections.Generic;

using System.Linq;

namespace CSLear

{

   class Program

   {

       private const int stdRow = 5;

       private const int stdCols = 6;

       static void Main(string[] args)

       {

           int[,] Arr = new int[stdRow, stdCols];

           ArrayRandomize(ref Arr, stdRow, stdCols);

           RemoveFirstRow(ref Arr, stdRow, stdCols);

           Console.ReadKey();

       }

       public static void RemoveFirstRow<T>(ref T[,] Matr, int ArrRows, int ArrCols)

       {

           T[,] Temp = new T[ArrRows-1,ArrCols];

           for (int i = 1; i < ArrRows; i++)  

           {

               for (int j = 0; j < ArrCols; j++)

               {

                   Temp[i - 1, j] = Matr[i, j];

               }

           }

           Matr = Temp;

       }

       public static void ArrayRandomize(ref int[,] Arr, int ArrRows, int ArrCols)

       {

           Random r = new Random();

           for (int i = 0; i < ArrRows; i++)

           {

               for (int j = 0; j < ArrCols; j++)

               {

                   Arr[i, j] = r.Next(-99, 99);

               }

           }

       }

   }

}

Объяснение:

4,4(22 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ