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

2. с клавиатуры вводится трёхзначное число. вывести на экран двузначное число, состоящее из первой и последней цифры введенного числа. пример: ввели число 672. выводим на экран число 62.

👇
Ответ:
Kurgan4511
Kurgan4511
22.11.2020
Var n,m:integer;
begin
write('n = '); readln(n);
m:=(n div 100 * 10) + n mod 10;
writeln('m = ',m);
end.

Пример:
n = 672
m = 62
4,8(44 оценок)
Открыть все ответы
Ответ:
ilyas59
ilyas59
22.11.2020

 Program SumAndMul;

Uses Crt;

var a:array[1..10] of real;

       i:integer;   

 

       sum,mul:longint;

begin

     clrscr;

     for i:=1 to 10 do

            begin

                 write('Введите -', i,' число:'  );

                  readln(a[i]);

             end;

 

 

sum:=0;mul:=1;

for i:=1 to 10 do

            begin

                if (a[i]>0) then sum:=sum+a[i];

                if (a[i]<0 )  then mul:=mul*a[i];

             end;    

 writeln('Сумма положительных элементов: ',sum);

 writeln('Произведение отрицательных элементов: ',mul);  

   readkey;

 

end.

 

 

 

4,5(57 оценок)
Ответ:
LianessaAngel2
LianessaAngel2
22.11.2020
Одно из решений, возможно, не самое эффективное
#include <iostream>
#include <iomanip>
int main()
{
    using namespace std;

    //исходная последовательность
    const int N = 8;
    double Arr[N] = { 14.2, -3.4, 7.8, -3.1, 8.2, 98.22, -7, 12 };

    //вывод на экран исходной последовательности
    for (int i = 0; i < N; ++i)
        cout << Arr[i] << "  ";
    cout << endl;

    //подсчитаем количества отрицательных и неотрицательных элементов
    int kpos = 0;
    int kneg = 0;
    for (int i = 0; i < N; ++i)
        if (Arr[i] < 0)
            ++kneg;
        else
            ++kpos;

    //создадим массивы отрицательных и неотрицательных элементов
    double * ArrNeg = new double[kneg];
    double * ArrPos = new double[kpos];

    int kn = 0, kp = 0;
    for (int i = 0; i < N; i++)
        if (Arr[i] < 0)
            ArrNeg[kn++] = Arr[i];
        else
            ArrPos[kp++] = Arr[i];

    cout << "Enter a, b, c or d: ";
    char ch;
    cin >> ch;

    if (ch == 'a' || ch == 'b' || ch == 'c' || ch == 'd')
    {
        switch (ch)
        {
            //пункт а)
            case 'a':
                for (int i = 0; i < kneg; ++i)
                    Arr[i] = ArrNeg[i];
                for (int i = 0; i < kpos; ++i)
                    Arr[i + kneg] = ArrPos[i];
                break;

                //пункт б)
            case 'b':
                for (int i = 0; i < kneg; ++i)
                    Arr[i] = ArrNeg[--kn];
                for (int i = 0; i < kpos; ++i)
                    Arr[i + kneg] = ArrPos[i];
                break;

                //пункт в)
            case 'c':
                for (int i = 0; i < kneg; ++i)
                    Arr[i] = ArrNeg[i];
                for (int i = 0; i < kpos; ++i)
                    Arr[i + kneg] = ArrPos[--kp];
                break;

                //пункт г)
            case 'd':
                for (int i = 0; i < kneg; ++i)
                    Arr[i] = ArrNeg[--kn];
                for (int i = 0; i < kpos; ++i)
                    Arr[i + kneg] = ArrPos[--kp];
                break;
        }
    }
    else
        cout << "You entered wrong symbol\n";

    for (int i = 0; i < N; ++i)
        cout << Arr[i] << "  ";
    cout << endl;
    delete[] ArrNeg;
    delete[] ArrPos;
    return 0;
}
4,8(77 оценок)
Это интересно:
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ