Question

Составьте программу, которая округляет вещественное число x. На языке Pascal Пример ввода: 8,56 Пример ввода:9

Answer 1

Var x:real; a:integer;
begin
write('x = ');
readln(x);
a:=round(x);
writeln(a);
end.

Пример:
x = 8.56
9