Question

1) Дана масса в граммах. переведите её в килограммы и граммы.
2) площадь участка измеряется в арах. Найдите кол-во полных км в квадрате.
и всё это нужно записать в виде программы

Answer 1

Var
sum, a,b,c:real;
begin
Readln(a);writeln(a/1000);
read(b);Writeln(b/10000);
end.