Используя язык программирования Паскаль выполнить задание: 1. Составить программу для вычисления y = 38x+231. 2. Составить программу для вычисления M = 7x+6y+276. 3. Составить программу для вычисления N = 4a2+2xa+8y.

Var x, y, a :real;
begin
writeln(введите переменные: x, y и a);
readln(x, y, a);
Y:=38*x+231;
M=7*x+6*y+276;
N=sqr(4*a)+2*x*a+8*y;
writeln(x, y и a соответственно равны: x, y, a);
end.

упс... не заметил, что нужно в 3 разные программы...

1)
var x, y :real;
begin
writeln(введите переменную x);
readln(x);
Y:=38*x+231;
writeln(y равен: , y);
end.

2)
var x, y, m :real;
begin
writeln(введите переменную x и y);
readln(x,y);
M:=7*x+6*y+276;
writeln(m равен: , m);
end.

3)
var x, y, a, n :real;
begin
writeln(введите переменные x, y, a);
readln(x, y, a);
N=sqr(4*a)+2*x*a+8*y;
writeln(N равен: , n);
end.