Почему не получается программа? В паскале abc Var a,b: real; begin writeln('введите...

Question

Почему не получается программа?
В паскале abc
Var a,b: real;
begin
writeln('введите количество килограмм');
readln(a)
b:=a/1000;
writln (a, ' кг = ',b, ' тонн');
end

Answer 1

После readln(a); и после end. может поэтому

Comments

спасибо