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

Чему будет равно значение переменной s? var i, s, p: integer; begin s : = 0; p : = 2; for i: = 1 to 3 do begin s : = s + i + p; p : = p + 3; end; end;

👇
Ответ:
kasha13
kasha13
31.01.2021

17?

Объяснение:

Просто код не правильно написан

4,6(68 оценок)
Открыть все ответы
Ответ:
#include <iostream>
#include <vector>

int main()
{
    int B[5][6];
    std::vector<int> Vec;
    for(int i = 0; i < 5; ++i)
        for(int j = 0; j < 6; ++j)
            std::cin >> B[i][j];
    for(int i = 0; i < 5; ++i)
    {
        int max = B[i][0];
        for(int j = 1; j < 6; ++j)
            if (max < B[i][j])
                max = B[i][j];
        Vec.push_back(max);
    }
    int min = Vec[0];
    int number = 0;
    for(int i = 1; i < 5; ++i) 
        if (min > Vec[i])
        {
            min = Vec[i];
            number = i;
        }
    std::cout << number;
}
4,6(78 оценок)
Ответ:
likaKiss1
likaKiss1
31.01.2021
Const N = 5; M = 6;
var 
  a: array[1..N, 1..M] of integer;
  c: array[1..N] of integer;
  i, j, mx, mn: integer;
  
begin
  randomize;
  writeln('Исходная матрица');
  mn := 1;
  for i := 1 to N do begin
    mx := -(MaxInt-1);
    for j := 1 to M do begin
      // Случайное число от -500 до 500
      a[i, j] := Random(1001) - 500;
      // выводим
      write(a[i, j]:5, ' ');
      // Ищем макс в строке
      if mx < a[i,j] then mx := a[i,j];
    end;
    
    c[i] := mx; // макс в строке
    
    // Поиск минимума
    if c[mn] > c[i] then mn := i;
    writeln;
  end;
  
  writeln ('Вектор с');
  for i := 1 to N do 
    write(c[i]:5, ' ');
    
  writeln(#13, #10, 'минимальный элемент:');
  writeln('c[', mn, '] = ', c[mn]);
end.
4,7(42 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ