Расположите в правильном порядке строки программы:

1) S:=a*h;
6) var a,b,h,p,s: integer;
2) end.
7) readln;
3) program pr;
8) Writeln(‘p=’,p,’ s=’,s);
4) p:=(a+b)^2;
9) a:=5;b:=8;h:=3;
5) begin

2. Установите соответствие между служебными словами и названиями разделов программы:
а) Var а) Раздел операторов
b) Program b) Раздел имени программы
c) Uses c) Раздел описания переменных
d) Begin …end d) Раздел описания библиотечных модулей

3.. Определите значение переменной a после выполнения алгоритма:
а := 8
b := 2
b := a/2*b
a := 2*а + 3*b
В ответе укажите одно целое число — значение переменной a.

4.Запишите значение переменной y, полученное в результате работы следующей программы.
var y, i: integer;
begin
y := 0;
for i := 1 to 3 do
y := y + 4 * i;
writeln(y);
end.

5.Запишите значение переменной t, полученное в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
var t, i: integer;
begin
t := 2;
for i := 1 to 3 do
t := t * i;
writeln(t);
end.

​

Для присваивания им значений.
Например: Integer - переменные целого типа (-1, -2, -3, 3,0, 123 и т. д)
Real - дробные переменные (3.88, 0.5 и т. д)
Таких переменных очень много. (в том же Pascale)
String - благодаря ей, с клавиатуры вводишь нужное число/слово .
Var x: integer; y: real; z:string;
Тогда, если сделаешь уравнение:
X-Z+Y =
Тебе нужно будет ввести, например:
X - 56
Y - 8.56
Z - ( в данном случае число) 845
Он тебе посчитает.
Если поставить, чтобы X Y Z вводились с клавиатуры, по одному алгоритму,  можно решить кучу одинаковых задач с разными данными.

Надеюсь
Удачи!

1 задача. Если есть ошибка или можно подругому сделать напишите. 
  class Program   
 {       
class Skier       
{           
public const float procent = 0.12f;           
public float distance = 7f;           
public float multiplication;           
public float alldistance;           
public float totalmileage = 7f;

public float Mileage(int day)         
  {                if (day == 1)                   
 {                        return alldistance = distance ;                    } 
  else if (day >= 2 )               
 {                    for (int i = 2; i <= day; i++)                 
   {                       
multiplication = distance * procent;                       
 alldistance = distance + multiplication;                     
  distance = alldistance;                   
 }   
    }
                return alldistance;                        
   }
 public float TotalPath(int days)            
 {                if (days == 1)               
 {                    return totalmileage = distance;                }
                else if (days >= 2)               
{                    for (int i = 2; i <= days; i++)                   
 {                       
multiplication = distance * procent;                       
alldistance = distance + multiplication;                     
   distance = alldistance;                       
totalmileage += alldistance;               
 }               
 }               
return totalmileage;         
  }
  }
 static void Main(string[] args)     
  {           
Skier skier = new Skier();
Console.WriteLine("Пробег лыжника за n дней тренировок, введите n: ");            skier.Mileage(Convert.ToInt32(Console.ReadLine()));            Console.WriteLine("Пробег: "+ skier.alldistance);
 Console.WriteLine("Суммарный путь за m дней, введите m: ");            skier.TotalPath(Convert.ToInt32(Console.ReadLine()));            Console.WriteLine("Суммарный путь: " + skier.totalmileage);
     Console.ReadLine();     
  }    }

Задача 2. Решил ее так как я сам понял..

class Students    {     
 List<int> numbers = new List<int>();       
public int countstudents;      
public int maxCount;       
public int minCount;       
public void clas(int n)       
 {         
  for (int i = 1; i <= n; i++)           
 {                   
Console.WriteLine("Введите кол-во учеников в классе: " );                 
countstudents = Convert.ToInt32(Console.ReadLine());                   
numbers.Add(countstudents);
}
maxCount = numbers.Max();              
minCount = numbers.Min();               
Console.WriteLine("Численность превышает на: " + (maxCount-minCount) + " ученика/ов");                 
}
 static void Main(string[] args)        {
 Students students = new Students();           
Console.WriteLine("Введите кол-во классов: ");            students.clas(Convert.ToInt32(Console.ReadLine()));           
 Console.ReadLine();
}