uses crt; <em>{подключение модуля CRT}</em>
var
x: integer;<em> {описание переменных}</em>
begin <em>{начало программы}</em>
writeln('vvedi chislo: '); <em>{вывод текста на экран}</em>
read(x);<em> {чтение введеных данных}</em>
if (x mod 3 = 0) then x:=x+1 <em>{условие}</em>
else x:=x-2; <em>{если условие не выполняется}</em>
write('rezultat: ',x);<em> {вывод текста на экран}</em>
end. <em>{конец программы}</em>
begin
var n := ReadInteger;
var a := ArrRandom(n, -10, 10);
a.Println;
var s := a.Where(p -> p.InRange(0, 3)).Sum;
a.Transform(p -> p < 0 ? s : p);
Swap(a[1], a[a.High - 1]);
a.Println
end.
Колонки, видео карта, звуковая карта, монитор, системный блок с процессором и материнской платой, мышь и клавиатура
Сначала вводится N(кол-во эл-в в массиве), потом сам массив a.
Потом вводится M и массив b.
Программа выводит перевернутые массивы a и b
Если будут вопросы пиши к комментариям.
#include <bits/stdc++.h>
using namespace std;
int main(){
int N;
cin >> N;
vector<int> a(N);
for (int i = 0; i < N; i++)
cin >> a[i];
int M;
cin >> M;
vector<int> b(M);
for (int i = 0; i < M; i++)
cin >> b[i];
reverse(a.begin(), a.end());
reverse(b.begin(), b.end());
for (int i = 0; i < N; i++)
cout << a[i] << ' ';
cout << endl;
for (int i = 0; i < M; i++)
cout << b[i] << ' ';
}