Cоставить программу вычисления R = 2,7 b^2-a1/5 (a2), при b = 8,4,6,2,0

Программа:

Var a, r, b:real; / название переменных и их типы;

begin / тело программы;

b:=8; / присваиваем;

writeln ('Введи a'); / просим ввести значение;

readln (b); / выводим переменную b;

r: = 2.7 * b * b - a * 1/5 * (a * 2); / вводим формулу, для того чтобы решить пример;

writeln ('r = ', r); / выводим ответ на экран;

end. / конец программы;