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

Паскаль. ввести с клавиатуры 3 числа. вывести их на экран в порядке возрастания. !

👇
Ответ:
Mary200001313
Mary200001313
12.03.2020
Procedure Swap(var A, B : Integer); begin A := A + B; B := A - B; A := A - B; end;  var A, B, C : Integer; begin Write('Введите A B C : '); ReadLn(A, B, C); if A < B then Swap(A, B); if B < C then Swap(B, C); if A < B then Swap(A, B); WriteLn(A, B, C); end.
4,4(49 оценок)
Ответ:
valeriaovsiann
valeriaovsiann
12.03.2020
var   a, b, c: integer;   begin   Read(a, b, c);   if ((a > b) and (a > c) and (b > c)) Then     Write(a, ' ', b, ' ', c)   else   if ((b > a) and (b > c) and (a > c)) Then     Write(b, ' ', a, ' ', c)   else   if ((c > a) and (c > b) and (a > b)) Then     Write(c, ' ', a, ' ', b)   else   if ((b > a) and (b > c) and (c > a)) Then     Write(b, ' ', c, ' ', a)   else     Write(c, ' ', b, ' ', a) end.
4,5(91 оценок)
Открыть все ответы
Ответ:
akrut
akrut
12.03.2020

#include <iostream>

#include <cmath>

#include <algorithm>

#pragma GCC optimize("Ofast")

#define ll long long

#define ld long double

using namespace std;

signed main() {

 const ll n = 3, m = 4;

 ll cnt = 0, sum = 0;

 ll a[n][m];

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

     for(ll j = 0; j < m;j++){

         cin >> a[i][j];

         if(a[i][j] > 0)

             cnt++;

         if(i == j)

             sum += a[i][j];

     }

 cout << "Amount of positive elements is: " << cnt << "\n";

 cout << "Sum of elements on the main diagonal is: " << sum;

}

4,4(41 оценок)
Ответ:
Данил611309
Данил611309
12.03.2020

#include <iostream>

int main()

{

int A[5];

int i, imax=0, imin=0,s = 0, k = 0;

setlocale(LC_ALL, "Russian");  // Русский язык в консоли

for (i = 0; i < 5; i++)

{

 std::cin >> A[i];

 if (A[i] == 0) k++;

 else if (A[i] > 0) s += A[i];

 if (A[i] > A[imax]) imax = i;

 if (A[i] < A[imin]) imin = i;

}

std::cout << "Максимальный элемент равен " << A[imax] << ", его номер - " << imax+1 << std::endl;

std::cout << "Минимальный элемент равен " << A[imin] << ", его номер - " << imin + 1 << std::endl;

std::cout << "Сумма положительных элементов равна " << s << std::endl;

std::cout << "Количество элементов, равных нулю: " << k << std::endl;

return 0;

}

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