В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
рысь32
рысь32
25.01.2021 02:20 •  Информатика

Написать полностью программу решения следующей : найти наименьшие элементы для матриц a(8,6), x(7,9) и номера строк тех столбцов, в которых они расположены. использовать подпрограмму

Показать ответ
Ответ:
muratbaevdanil
muratbaevdanil
17.06.2020 04:41

var

 a: string;

 b: array[1..9]of integer;

 sort: boolean;

 max, k: integer;

begin

 Readln(a);

 for var i := 1 to Length(a) do

   b[i] := strtoint(a[i]);

 sort := false;

 while sort = false do

 begin

   sort := true;

   k += 1;

   for var i := 1 to Length(a)-1 do

   begin

     if a[i] < a[i+1] then

     begin

       sort := false;

       var value2 := a[i];

       a[i] := a[i+1];

       a[i+1] := value2;

     end;

   end;

 end;

 write(a[1]);

end.

Программа написана на PascalABC.net

на free pascal или turbo pascal она может не работать

0,0(0 оценок)
Ответ:
myagkixmatveeva
myagkixmatveeva
03.12.2020 08:54

Введите а: -4

Введите b: 12

! Результат работы а: 8

Введите а: -4

Введите b: 6

! Результат работы б: 22

Введите а: 90

Введите b: 40

! Результат работы в: 70

Объяснение:

С++:

#include <iostream>

using namespace std;

int main()

{

setlocale(LC_ALL, "RUS");

int a, b, c;

//a

cout << "Введите а: ";

cin >> a;

cout << "Введите b: ";

cin >> b;

b = b + a * 2;

if (a > b)

{

 c = a + b;

}

else

{

 c = b - a;

}

cout << "Результат работы а: " << c << endl;

//б

cout << "Введите а: ";

cin >> a;

cout << "Введите b: ";

cin >> b;

a = a - b * 2;

if (a <= b)

{

 c = b - a;

}

else

{

 c = a - b;

}

cout << "Результат работы б: " << c << endl;

//в

cout << "Введите а: ";

cin >> a;

cout << "Введите b: ";

cin >> b;

a = a - b * 3;

if (a>b)

{

 c = a - b;

}

else

{

 c = b - a;

}

cout << "Результат работы в: " << c << endl;

}

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота