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

С++ Поиск элементов в двумерном массиве и формирование одномерных динамических
массивов
•Дана матрица размером m × n, состоящая из целых или вещественных чисел, вводимых пользователем с клавиатуры. Выполнить задание в соответствии со своим вариантом и
вывести на экран:
1) Матрицу (или матрицы) в виде таблицы;
2)Одномерный массив (если он есть) в виде строки.
Сформировать одномерный массив из элементов матрицы, которые расположены
в четных строках матрицы

👇
Ответ:
Face200
Face200
20.01.2022

#include<iostream>

using namespace std;

int main()

{

int n = 0, m = 0, i = 0, g = 0;

cout << "n =";

cin >> n;

cout << "m =";

cin >> m;

const int q = n,w = m;

double a[q][w];

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

for(g = 0; g<m; g++){

cout << (i + 1) << ' ' << (g + 1);

cin >> a[i][ g ];

}

}

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

for(g = 0; g < m; g++){

cout << a[ i ][ g ] << "\t";

}

cout << '\n';

}

return 0;

}

у меня ошибки не выдаёт

если переменная должна иметь константное зн., то подставь при объявлении const, но у меня выскакивает ошибка, я исправил момент объявления массива "a", возможно тут была ошибка

4,4(5 оценок)
Открыть все ответы
Ответ:
Dariu111
Dariu111
20.01.2022
Uses crt;
type oc=record
       per,bt,tr:integer;
end;
ab=record
fam,im:string;
ocen:oc;
end;
var b:array [1..50] of ab;
l:ab;
i,n,g,k,h:integer;
begin
clrscr;
writeln ('введи количество абитуриентов');
readln (n);
Writeln ('Вводи фамилии, имена и 3 оценки');
for i:=1 to n do
with b[i] do
begin
readln (fam);
readln (im);
readln (ocen.per,ocen.bt,ocen.tr);
end;
clrscr;
for j:=1 to n do
for i:=1 to n-1 do
if b[i].fam>b[i+1].fam then
begin
l:=b[i];
b[i]:=b[i+1];
b[i+1]:=l;
end;
writeln ('Список всех аббитуриентов:');
for i:=1 to n do
writeln (b[i].fam,' ',b[i].im,' ',b[i].ocen.per,' ',b[i].ocen.bt,' ',b[i].ocen.tr);
writeln ('Список допущенных аббитуриентов');
for i:=1 to n do
with b[i] do
begin
with ocen do
if (per>30) and (bt>30) and (tr>30) and (per+bt+tr>140) then writeln (fam,' ',im,' ',ocen.per,' ',ocen.bt,' ',ocen.tr);
end;
readln;
end.
4,6(99 оценок)
Ответ:
87713404829
87713404829
20.01.2022
Uses crt;
type oc=record
       per,bt,tr:integer;
end;
ab=record
fam,im:string;
ocen:oc;
end;
var b:array [1..50] of ab;
l:ab;
i,n,g,k,h:integer;
begin
clrscr;
writeln ('введи количество абитуриентов');
readln (n);
Writeln ('Вводи фамилии, имена и 3 оценки');
for i:=1 to n do
with b[i] do
begin
readln (fam);
readln (im);
readln (ocen.per,ocen.bt,ocen.tr);
end;
clrscr;
for j:=1 to n do
for i:=1 to n-1 do
if b[i].fam>b[i+1].fam then
begin
l:=b[i];
b[i]:=b[i+1];
b[i+1]:=l;
end;
writeln ('Список всех аббитуриентов:');
for i:=1 to n do
writeln (b[i].fam,' ',b[i].im,' ',b[i].ocen.per,' ',b[i].ocen.bt,' ',b[i].ocen.tr);
writeln ('Список допущенных аббитуриентов');
for i:=1 to n do
with b[i] do
begin
with ocen do
if (per>30) and (bt>30) and (tr>30) and (per+bt+tr>140) then writeln (fam,' ',im,' ',ocen.per,' ',ocen.bt,' ',ocen.tr);
end;
readln;
end.
4,6(33 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ