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

Надо решить на языке паскаля в массиве из 3 строк 4 столбцов найти и вывести на экран. 1)все элементы массива больше 10. 2)минимальный элемент 2 строки. 3)сумму элементов каждого столбца. вывести полученный массив на экран. .

Показать ответ
Ответ:
aisha834
aisha834
07.10.2020 11:50
Я не знаю раьлисчоджтсро
0,0(0 оценок)
Ответ:
54526
54526
07.10.2020 11:50
Program ar;
Var a:array [1..3] of array [1..4] of integer;
    i, j, min, sum:integer;
begin
  for i:=1 to 3 do
    for j:=1 to 4 do
      read(a[i][j]);
  for i:=1 to 3 do
    for j:=1 to 4 do
      if a[i][j] > 10 then write(a[i][j], ' ');
  writeln;
  min:=a[2][1];
 
  for j:=1 to 4 do
    if a[2][j] < min then min:=a[2][j];
  writeln(min);
  for i:=1 to 3 do
    begin
    sum:=0;
    for j:=1 to 4 do
      sum:=sum + a[i][j];
    write(sum, ' ');
    end;
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота