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

Составить программу в паскале. в данном слове произвести обмен первого и последнего символов. (слово любое)

👇
Ответ:
maxim090
maxim090
24.04.2021
Var
   S:string;
   C:char;
Begin
Write('Введите слово: ');
ReadLn(S);
C:=S[1];
S[1]:=S[Length(S)];
S[Length(S)]:=C;
WriteLn(S);
End.
4,4(11 оценок)
Открыть все ответы
Ответ:
rimmabuketova
rimmabuketova
24.04.2021

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,A,B,count1=0;

long long min1;

int main()

{

   cin>>A>>B;

   for(int i=B-1;i>A;i--){

       cout<<i<<" ";

       count1++;

   }

   cout<<endl;

   cout<<count1<<endl;

   return 0;

}

Объяснение:

Програма написана на c++, я думаю ти напишеше на пайтоні тому, що у моєму варінті показано як це усе має працювати.

1.Спочатку ти вводиш 2 цілих числа. //cin>>A>>B;

2.Робиш цикл від B до A

3. Виводиш i(це може бути люда змінна)

4.Лічильник++

5.cout<<endl;  я роблю пропуск, для удобства.

6.Вивожу лічильник на екран

4,4(48 оценок)
Ответ:
якура
якура
24.04.2021
Public static double CosineBetweenVectors(double[] a, double[] b)
        {
            if (a.Length != b.Length || a.Length == 0) throw new Exception("не верные параметры");

            double ab = 0;
            double a_length = 0;
            double b_length = 0;
            for (var i = 0; i < a.Length; i++)
            {
                ab += a[i] * b[i];
                a_length = a[i] * a[i];
                b_length = b[i] * b[i];
            }

            if (a_length * b_length == 0) throw new Exception("Нулевые вектора");

            return ab / Math.Sqrt(a_length) / Math.Sqrt(b_length);
        }
4,6(97 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ