1. Объявите переменные, необходимые для вычисления значения функции у = х2.
2. Объявите переменные, необходимые для пересчета веса из фунтов в килограммы.
3. Объявите переменные, необходимые для вычисления объема параллелепипеда.
4. Объявите переменные, необходимые для вычисления площади круга.
5. Объявите переменные, необходимые для вычисления площади кольца.
6. Объявите переменные, необходимые для вычисления объема и площади поверхности цилиндра.
7. Объявите переменные, необходимые для вычисления стоимости покупки, состоящей из нескольких тетрадей, карандашей и линейки.
8. Объявите переменные, необходимые для вычисления стоимости покупки, состоящей из нескольких тетрадей и такого же количества обложек.
9. Запишите инструкцию, которая присваивает переменной х значение —1,5.
10. Запишите инструкцию, которая присваивает переменной summa нулевое значение.
11. Запишите инструкцию, которая увеличивает на единицу значение переменной п.
12. Запишите инструкцию, которая уменьшает на два значение переменной counter.
13. Запишите инструкцию вычисления среднего арифметического переменных xi и х2.
16. Запишите в виде инструкции присваивания формулу пересчета веса из фунтов в килограммы (один фунт равен 409,5 г).
17. Запишите в виде инструкции присваивания формулу пересчета расстояния из километров в версты (одна верста равна 1066,8 м).
18. Запишите в виде инструкции присваивания формулу вычисления площади прямоугольника.

Задача 1

х: real; { аргумент функции } у: real; { значение функции }

Задача 2

funt: real; { вес в фунтах }
kg: real; { вес в килограммах }


Задача 5

rl: real; { диаметр кольца } r2: real; { диаметр отверстия } s: real; { площадь кольца }

Задача 7

CenaTetr: real; {цена тетради }
KolTetr: integer; { количество тетрадей }
CenaKar: real; { цена карандаша }
KolKar: integer; { количество карандашей }
CenaLin: real; { цена линейки }
Suirana: real; { стоимость покупки }

Задача 11

п:=п+1;

Задача 14

у:=-2.7*х*х*х+0.23*х*х-1.4;

Задача 16

kg:=gunt*0.4095;