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

Программа в паскаль. если знаете как решить хоть одно- напишите


Программа в паскаль. если знаете как решить хоть одно- напишите

👇
Ответ:
вова2631
вова2631
21.02.2020

begin

 var N: word;

 write('Введите число: '); read(N);

 var S:=N.ToString;

 //2.1

 writeln('Является ли число "перевёртышем?": ',(S=S.Inverse)? 'да':'нет');

 //2.2

 write('Есть ли одинаковые цифры: ',((S[1]=S[2]) or (S[2]=S[3]) or (S[1]=S[3]))? 'да':'нет');

end.

Примечание:

Так и не смог понять, где тут надо было использовать деление числа

4,7(6 оценок)
Открыть все ответы
Ответ:
tyunchik2009
tyunchik2009
21.02.2020
Чип, вживляемый в мозг всем при рождении. Он подключен непосредственно к нейронам, передает компу напрямую команды (без необходимости пользоваться мышкой и клавой) , и передает от компа в мозг видео и аудио сигналы без необходимости пользоваться монитором и наушниками. Кроме того, становится возможно передавать запахи, вкусы и ощущения. 

... очень скоро находится кучка хакеров, которые ломают эту систему, превращая всех людей на планете в зомби. Кучка хакеров захватывает мир. Потом главный хакер убивает всех других хакеров и становится правителем мира. И никто даже не рыпнется против него! :) Занавес.
4,6(55 оценок)
Ответ:
2006n
2006n
21.02.2020

1)

#include <iostream>

using namespace std;

signed main(){

   int n, res = 0;

   cin >> n;

   int a[n];

   for(int i = 0; i < n; i++){

       cin >> a[i];

       res = max(res, abs(a[i] - a[0]));

   }

   cout << res;

}

2)

#include <iostream>

using namespace std;

signed main(){

   int n, mn_val = 1e9, mn_in = 0;

   cin >> n;

   int a[n];

   for(int i = 0; i < n; i++){

       cin >> a[i];

       if(a[i] < mn_val){

           mn_val = a[i];

           mn_in = i;

       }

   }

   swap(a[mn_in], a[n-1]);

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

       cout << a[i] << " ";

}

3)

#include <iostream>

using namespace std;

signed main(){

   int n, mx = -1e9;

   cin >> n;

   int a[n];

   for(int i = 0; i < n; i++){

       cin >> a[i];

       if(a[i] < 0)

           mx = max(mx, a[i]);

   }

  cout << mx;

}

4)

#include <iostream>

using namespace std;

signed main(){

   int n, mx1 = -1e9, mx2 = -1e9;

   cin >> n;

   int a[n];

   for(int i = 0; i < n; i++){

       cin >> a[i];

       if(a[i] > mx1){

           mx2 = mx1;

           mx1 = a[i];

       }

       else if(a[i] > mx2)

           mx2 = a[i];

   }

  cout << mx2;

}

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