Question

Создать в PascalABC программу по переводу тонн в килограммы

Answer 1

Ответ:

Объяснение:

uses crt;

var k,t:real;

begin

clrscr;

write('Введите килограммы: ');

Readln(k);

t:=k/1000;

Writeln('Это составляет ',t,'  тонн');

end.