1)var x,y,c:integer;
z:real;
begin
readln (x,y,c);
z:=(x*x+sqrt(3*y-c))/(abs(34. 5+c));
writeln (z);
end.
(+первый файл)
2)var x,y,c,z:integer;
begin
writeln ('Сколько учеников в каждом 11 классе? (Вводить через пробел три числа)');
readln (x,y,c);
z:=x+y+c;
writeln ('Выпускников в школе: ',z);
end.
P. s. Если помог, отметь как лучшее решение)