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

Паскаль. как записать в паскаль число, возведённое в отрицательную степень? например мне нужно записать b^-2 как?

👇
Ответ:
UNNAMED3228
UNNAMED3228
03.07.2021
Var b:double;

begin
b:=4.0;
writeln(power(b, -2));
end.
4,8(28 оценок)
Открыть все ответы
Ответ:
DimitryPanika
DimitryPanika
03.07.2021

#include <iostream>

#include <regex>

#include <fstream>

#include <string>

using namespace std;

int main() {

   ifstream fin("f");

   string s = "", _temp;

   while (getline(fin, _temp))

       s += _temp;

   fin.close();

   ofstream fout("g");

   try {

       regex re("[a-z]");

       sregex_iterator next(s.begin(), s.end(), re);

       sregex_iterator end;

       while (next != end) {

           smatch match = *next;

           fout << match.str();

           next++;

       }

   }

   catch (regex_error& e) {

       cout << "smth went wrong.";

   }

   fout.close();

}

4,6(3 оценок)
Ответ:
ника3931
ника3931
03.07.2021
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  var a:=ArrRandom(100,-20,20); a.Println;
  WritelnFormat('Положительных {0}, отрицательных {1}',
    a.Where(x->x>0).Count,a.Where(x->x<0).Count)
end.

Тестовое решение:
-19 12 19 -17 -5 10 -13 -2 -4 16 -6 -12 -3 5 -3 -6 -1 8 -19 -14 -1 9 -10 20 -7 20 5 17 -7 11 -5 -14 -19 -18 16 13 11 -2 -3 9 1 11 10 -13 8 -14 -15 -13 8 5 -7 20 -20 18 2 -8 2 19 10 -5 -15 -10 -16 5 1 -12 -14 -6 9 5 3 -20 -9 -7 6 9 20 -18 -8 -13 14 -3 -11 9 -3 -5 -15 -16 0 4 -10 12 8 -19 4 -10 6 -15 7 0
Положительных 44, отрицательных 54
4,6(10 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ