// PascalABC.NET 3.1, сборка 1200 от 13.03.2016 const n=5; type Matrix=array[1..n,1..n] of integer;
procedure DummySchool(var a:Matrix); begin Writeln('Ввод элементов матрицы'); for var i:=1 to n do begin Write(n,' элементов строки ',i,': '); for var j:=1 to n do Read(a[i,j]); end; Writeln('Сформирована матрица ',n,'x',n); for var i:=1 to n do begin for var j:=1 to n do Write(a[i,j]:5); Writeln end end;
begin var B:Matrix; DummySchool(B); var sn:=0; var sp:=0; for var i:=1 to n do for var j:=1 to n do if B[i,j]<0 then sn+=B[i,j] else if B[i,j]>0 then sp+=B[i,j]; Writeln('Сумма отрицательных ',sn); Writeln('Сумма положительных ',sp) end.
ответ:Вопрос: Найдите слово, в котором нужно вставить о.
Выберите один из 4 вариантов ответа:
1) оз...рение
2) з...ри
3) з...рница
4) оз...рённый
Задание 3
Вопрос: Найдите слово, в котором нужно вставить а.
Выберите один из 4 вариантов ответа:
1) заг...рать
2) подг...ревший
3) наг...р
4) отг...рает
Задание 4
Вопрос: Выберите корни, которые пишутся под ударением.
Выберите несколько из 6 вариантов ответа:
1) -зар-
2) -зор-
3) -гар-
4) -гор-
5) -кос
6) -кас-
Задание 5
Вопрос: Выберите слова, в которых нужно вставить а.
Выберите несколько из 5 вариантов ответа:
1) прик...саться
2) уг...ревший
3) уг...рный
4) оз...риться
5) прик...сновение
Задание 6
Вопрос: Выберите слова, в которых нужно вставить о.
Выберите несколько из 5 вариантов ответа:
1) соприк...саться
2) соприк...снёшься
3) заг...релый
4) з...рничный
5) з...рька
Задание 7
Вопрос: Поставьте глагол "прик...снуться" в форму 1-го лица ед. ч. будущего времени.
В ответе запишите этот глагол.
Запишите ответ:
Задание 8
Укажите предложения, в которых сделаны ошибки.
Выберите несколько из 4 вариантов ответа:
1) Мать бережно и нежно касается своего ребёнка.
2) Внезапно на поэта снизошло озорение.
3) Озарные ребята разбили окно во дворе.
4) Нам пришлось есть подгоревшую яичницу.
Задание 9
Вопрос: Укажите предложения, в которых нет ошибок.
Выберите несколько из 4 вариантов ответа:
1) Что случиться, если эти два два провода соприкоснутся?
2) На заводе петард внезапно водникло возгарание.
3) Загорать летом на Мальдивах очень приятно.
4) На краю небосвода мелькали пугающие зарницы.
Задание 10
Вопрос: Правильно сопоставьте слова и правила, по которым их следует написать.
Укажите соответствие для всех 6 вариантов ответа:
А) а, есть ударение
Б) о, есть ударение
В) а, есть суффикс а
Г) о, нет суффикса а
Д) о, нет ударения
Е) а, нет ударения
1) прик...снувшись
2) оз...рила
3) ог...рок
4) возг...рание
5) к...саясь
6) з...рька
умоляю!❤
Объяснение:
const
n=5;
type
Matrix=array[1..n,1..n] of integer;
procedure DummySchool(var a:Matrix);
begin
Writeln('Ввод элементов матрицы');
for var i:=1 to n do begin
Write(n,' элементов строки ',i,': ');
for var j:=1 to n do Read(a[i,j]);
end;
Writeln('Сформирована матрица ',n,'x',n);
for var i:=1 to n do begin
for var j:=1 to n do Write(a[i,j]:5);
Writeln
end
end;
begin
var B:Matrix;
DummySchool(B);
var sn:=0;
var sp:=0;
for var i:=1 to n do
for var j:=1 to n do
if B[i,j]<0 then sn+=B[i,j]
else
if B[i,j]>0 then sp+=B[i,j];
Writeln('Сумма отрицательных ',sn);
Writeln('Сумма положительных ',sp)
end.
Тестовое решение:
Ввод элементов матрицы
5 элементов строки 1: 6 23 -5 13 9
5 элементов строки 2: 42 0 -38 16 37
5 элементов строки 3: -5 -18 3 11 8
5 элементов строки 4: 9 13 -11 0 3
5 элементов строки 5: 19 -17 0 15 5
Сформирована матрица 5x5
6 23 -5 13 9
42 0 -38 16 37
-5 -18 3 11 8
9 13 -11 0 3
19 -17 0 15 5
Сумма отрицательных -94
Сумма положительных 232