Question

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

Answer 1

var a,r,b:real;
begin
b:=8;
writeln ('Введи a');
readln (b);
r:=2.7*b*b-a*1/5*(a*2);
writeln ('r = ',r);
end.

Answer 2

а через qbasic можно?

Answer 3

помогите плииз,как это решить через qbasik