Question

Написать программу, которая запрашивает ввод вещественного числа в переменную А, делит это число на 3 и прибавляет в переменную А. выводит результат на экран.

Answer 1

var a:real; 
begin 
writeln('Введите число а'); 
read(a); 
a:=a/3+a; 
writeln(a); 
end.