Дана арифметическая прогрессия: - 35, -38, -41... найдите двадцать пятый члены данной прогрессии​

-107

Пошаговое объяснение:

a2 = a1 + d

a3 = a2 + d = a1 + d*2

...

an = a1 + d*(n-1)

Для данной прогрессии

a1 = -35

d = a2 - a1 = -38 -35 = -3

a25 = a1 + d*24 = -35 - 3*24 = -107

Надеюсь, понятно, если что пиши

Я так понимаю, ты пишешь программу, которая говорит, сколько тебе лет))
Во-первых, её можно упростить. Во-вторых, ты в одном месте не поставил ;. Напишу примерный вид программы, которая должна работать:

Program Vozrast;
var i: integer;
begin
writln ('Введите возраст: ');
readln(i);
if (i < 1) or (i > 150) then
  writeln ('Это туфта, насяльника!');
if (i <> 11) and (i mod 10 = 1) then
  writeln (i, 'год');
if ((i<10) or (i>20)) and ((i mod 10 = 2) or (i mod 10 = 3) or (i mod 10 = 4) then
 writeln (i, 'года');
if ((i  > 9) and (i < 21)) or ((i mod 10 = 5) or (i mod 10 = 6) or (i mod 10 = 7) or (i mod 10 = 8) or (i mod 10 = 9) or (i mod 10 = 0)) then
  Writeln (i, 'лет');
end.

Должно сработать))

100. Назовите все отличия функций от процедур?
а) функция передает в точку вызова скалярное значение, а процедура - нет
г) имя функции может входить в выражении как операнд

101. С каких параметров происходит передача данных из главной программы в подпрограмму?
а) фактических

102. Выберите неправильную форму записи оператора цикла
в) WHILE I<5 TO BEGIN I:=I+1; WRITELN(I); END

103. Какое выражение обеспечивает генерирование случайных чисел в диапазоне [4,10[
а) 4+RANDOM(6)

104. что означает FV в команде read(FV, x1, x2,..., xn) в Паскале ?
б) переменную, связанную с файлом, откуда берется информация
г) первую переменную величину для ввода информации

105. Каким окажется результат выполнения следующего фрагмента кода X:= 5; Y:= X+1; Writeln('Х=',X, Y=',Y);?
в) X=5 Y=6

106. Какое значение примет переменная Х после выполнения команды X:=SQR(4)/2*2?
в) 16

107. Каким окажется результат выполнения следующего фрагмента кода: X:= 5; Y:= 8; Т:= Х; X:=Y; Y:= T; Writeln('Х=', X, Y=',Y);?
б) X=8 Y=5

108. Логическое выражение
(N Mod 10 Mod 2) Or (N Div 10 Mod 10 Mod 2 = 0) Or (N Div 100 Mod 2 = 0)
должно принимать значение TRUE тогда и только тогда, когда истинно высказывание
Выражение записано с ошибкой
г) в трёхзначном натуральном числе хотя бы одна чётная цифра

109. Цикл в фрагменте программы P := 4; Repeat P := P * 0.1 Until P < 0.0001; будет исполнен?
г) 5 раз

110. Значение R после выполнения операции логического присваивания
R := Not (A Or B Or (X > 2) And (Y < 0))
при A = False, B = False, X = 3, Y = 2 будет равно
в) True

111. Значения переменных a и b после выполнения следующих действий
a := 15 Div (16 Mod 7); b := 34 Mod a * 5 - 29 Mod 5 * 2;
будут равны
г) a = 7, b = 22

112. Во фрагмент алгоритма, печатающий все двузначные числа, в записи которых есть цифра N или сумма цифр которых равна самим числам, нужно вписать логическое выражение
Объяснение конечно еще то
г) ((P1 = N) Or (P2 = N)) And (S = K)

113. Тело цикла в программе a := 1; b := 1; While a + b < 8 Do begin a := a + 1; b := b + 2 end;
выполнится?
б) 2 раза

114. Задана строка St (см Фрагмент алгоритма)
??? где фрагмент ???
115. Задан двумерный массив X[1..n, 1..m]. Процедура
??? где Процедура ???
116. Задан двумерный массив X[1..n, 1..m]. Функция возвращает значение
??? где Функция ???
117 = 110

118. В каком фрагменте программы подсчитывается сумма элементов квадратной матрицы, расположенных выше главной диагонали?
а) For i:= 1 to n do
For j:= 1 to n do
If i<=j then
S:=s+a[I,j];