#include <iostream>
#include <array>
#include <vector>
#include <algorithm>
#include <iterator>
int main()
{
const int N = 5;
std::array<int, N> matrix[N]{
{-1, -2, -3, -4, -5},
{-6, -7, -8, -9, -10},
{-11, -12, -13, -14, -15},
{-16, -17, -18, -19, -20},
{-21, -22, -23, -24, -25}
};
std::vector<int> vec;
for(int i = 0; i < N; i++)
for(int j = 0; j < N; j++)
if(j < i)
if(matrix[i][j] < 0)
vec.push_back(matrix[i][j]);
}
std::copy(vec.begin(), vec.end(), std::ostream_iterator<int>(std::cout, " "));
std::cout << std::endl;
//Язык Pascal
Program multiplication;
Var
code, rightAnswers, mistakes, answersCount, value1, value2, answer: integer;
Begin
Randomize;
code := 1;
rightAnswers := 0;
mistakes := 0;
answersCount := 0;
while code = 1 do
begin
Write('Проверим? ');
Readln(code);
Writeln();
if (code = 1) then
value1 := random(1, 9);
value2 := random(1, 9);
Write(value1, '*', value2, ' = ');
Readln(answer);
if (answer = value1 * value2) then
Writeln('Правильно!');
rightAnswers := rightAnswers + 1;
end
else
Writeln('Неправильно!');
mistakes := mistakes + 1;
end;
answersCount := answersCount + 1;
Writeln('Статистика:');
Writeln('Задано вопросов: ', answersCount);
Writeln('Количество правильных ответов: ', rightAnswers);
Writeln('Число ошибок: ', mistakes);
End.
#include <iostream>
#include <array>
#include <vector>
#include <algorithm>
#include <iterator>
int main()
{
const int N = 5;
std::array<int, N> matrix[N]{
{-1, -2, -3, -4, -5},
{-6, -7, -8, -9, -10},
{-11, -12, -13, -14, -15},
{-16, -17, -18, -19, -20},
{-21, -22, -23, -24, -25}
};
std::vector<int> vec;
for(int i = 0; i < N; i++)
{
for(int j = 0; j < N; j++)
{
if(j < i)
{
if(matrix[i][j] < 0)
vec.push_back(matrix[i][j]);
}
}
}
std::copy(vec.begin(), vec.end(), std::ostream_iterator<int>(std::cout, " "));
std::cout << std::endl;
}
//Язык Pascal
Program multiplication;
Var
code, rightAnswers, mistakes, answersCount, value1, value2, answer: integer;
Begin
Randomize;
code := 1;
rightAnswers := 0;
mistakes := 0;
answersCount := 0;
while code = 1 do
begin
Write('Проверим? ');
Readln(code);
Writeln();
if (code = 1) then
begin
value1 := random(1, 9);
value2 := random(1, 9);
Write(value1, '*', value2, ' = ');
Readln(answer);
if (answer = value1 * value2) then
begin
Writeln('Правильно!');
rightAnswers := rightAnswers + 1;
end
else
begin
Writeln('Неправильно!');
mistakes := mistakes + 1;
end;
answersCount := answersCount + 1;
Writeln();
end;
end;
Writeln('Статистика:');
Writeln('Задано вопросов: ', answersCount);
Writeln('Количество правильных ответов: ', rightAnswers);
Writeln('Число ошибок: ', mistakes);
End.