Задание 1
- integer
- Вещественные числа
- Для объявления переменных
- Writeln
Задание 2
На третьей строчке, видимо, ошибка, и вместо Вывод(x) на самом деле Ввод(x).
- var
- x: integer;
- y: real;
- begin
- Readln(x);
- y := (10 + 2 * x) / (11 - x);
- Writeln(y);
- end.
При x = 3 переменная y = 2Задание 3
- var
- number, resultNumber, i: integer;
- begin
- resultNumber := 1;
- for i := 1 to 3 do
- begin
- Readln(number);
- resultNumber := resultNumber * number;
- end;
- Writeln(resultNumber);
- end.
Задание 4
- var
- a: integer;
- b, c: real;
- begin
- a := 3;
- b := -1.5;
- c := 6 - 2 * b;
- c := c - a;
- Writeln(c);
- end.
Результатом вывода будет число 6Задание 5
- var
- x, y, z: integer;
- begin
- x := 8;
- y := 2;
- if (x > y) then
- z := x - y
- else
- z := y + x;
- Writeln(z);
- end.