Question

Помогите решить задачу по информатике. "Написать программу вычисления выражения 4d-10/25 ("/" деление)

Answer 1

var d,a:real;
begin
writeln ('4d-10/25');
writeln ('Введите переменную d');
readln (d);
a:=4*d-10/25;
writeln ('4*',d,'-10/25 = ',a);
end.