Условный оператор. Паскаль

1. Вычислите значение переменной x после выполнения операторов:
a:=25; b:=3; a:=a*2; b:=a*b; x:=b–a;

2. Какого типа должны быть следующие переменные:
а) a:=sqrt(49);
b) q:=1=1;
c) w:='f';

3. Найдите значение логических выражений:
a) (17 mod 3=1) and (5>=5)
b) (24–41>=15) or not(3<2)
c) (27+4) or (3<=3)

4. Записать на языке паскаль:
Целое число a четное
Целое число к кратно семи
Целое число a является двузначным отрицательным
Каждое из чисел а,b положительно
Хотя бы одно из чисел a,b,c является отрицательным
Число x принадлежит отрезку [a,b]
Точка с координатами (x,y) находится внутри круга с центром (0,0) и радиусом r

5. Составьте на языке Паскаль программу решения следующей задачи:
А) Найдите меньшее из четырёх чисел a, b, c, d.
Б) Решите линейное уравнение вида ax+b=0, где коэффициенты a и b вводятся с клавиатуры.

6) Записать на языке паскаль:
Целое k является трехзначным числом, кратным пяти
Неотрицательное целое число n не кратно семи
Из отрезков с длинами a,b,c можно построить треугольник
Точка с координатами (x,y) принадлежат первой или третьей четверти координатной плоскости

7. 1. Укажите ошибки:
a) if 1<x<2 then
x:=x+1;
y:=0;
else
x:=0;
y:=y+1;
b) if 1<x and x<2 then
begin
x:=x+1;
y:=0
end;
else
begin
x:=0;
y:=y+1
end

8. Составьте программу на языке Паскаль для решения следующей задачи:
А) По номеру y (y>0) некоторого года определите c – номер его столетия (учесть, что началом XX столетия был 1901 год, началом XXI столетия – 2001 год, а не 1900 и 2000 соответственно).
Б) Решите уравнение вида ax2+bx+c=0, где a, b, c – действительные числа, введенные с клавиатуры.
Указание к решению: Решить уравнение – это значит найти его корни, или сообщить о том, что корней нет.
В) Составьте программу, которая определяет, к какому классу букв (гласные, согласные, не гласные и не согласные) относится введенный символ русского алфавита.
Указание к решению: в задаче использовать оператор варианта.

9. Составьте на языке Паскаль программу для решения следующей задачи:
А) Вычислите сумму следующих десяти дробей 1/2+3/4+5/6+7/8+…
Б) Вычислите значения функции у = 4х3 – 2х2 + 5 для значений x, изменяющихся от –3 до 1 с шагом 0.1.
В) Вычислите значение следующего выражения 1–1/2 + 1/3 –... + 1/9999–1/10000.

10.
Составьте на языке Паскаль программу решения следующей задачи:
А) Составьте программу нахождения значения факториала целого неотрицательного числа (n!=1*2*…*n).
Б) Составьте программу нахождения наибольшего общего делителя (НОД) двух натуральных чисел (алгоритм Евклида).






Вознаграждение за конкретное решение с комментариями в лс kuzya2636@mail.ru