Разбираешься в компьютерах и играх, но не разбираешься в программирование. Я могу сделать вывод, что ты играл на протяжении 6 лет в игры и собирал себе компьютер для игр
Думаю ты не разбираешься во внутренностях компьютера.
Экзамены перенесли на август, мои тебе советы:
Готовься к ЕГЭ
Смотри видео уроки по профильной математике ЕГЭ от Павла Маслова (Ютуб)
Физику смотри также на Ютубе (Пенкин)
Также могу тебе посоветовать решать каждый день по 15 вариаций заданий, которые ты например выучил решения первого задания матана, решай их как можно больше)
Сдай ЕГЭ
Без него ничего не выйдет
// С циклом:
type Linia=array[1..7] of integer;
var
x, y : Linia;
Proizvedenie, i: integer;
begin
Proizvedenie := 1;
for i := 3 to 7 do
begin
Proizvedenie := Proizvedenie * y[i];
end;
WriteLn(Proizvedenie);
end.
// Без цикла
type Linia=array[1..7] of integer;
var
x, y : Linia;
Proizvedenie, i: integer;
begin
Proizvedenie := y[7] * y[6] * y[5] * y[4] * y[3];
WriteLn(Proizvedenie);
end.