Решить данную задачу в Паскале через тип integer.

Задача: Известна масса тела в килограммах. Определить сколько целых тонн содержится в данном числе.

Question

Информатика

Старемилиан

4 января, 10:18

Решить данную задачу в Паскале через тип integer.

Задача: Известна масса тела в килограммах. Определить сколько целых тонн содержится в данном числе.

+2

Ответы (1)

Знаете ответ на вопрос?

Илья · Answer 1

uses crt;

var

a, b, c: integer;

st : string;

begin

readln (a) ;

str (a, st) ;

if length (st) <=3 then writeln (0,' ton') else begin b:=a div 1000;

writeln (b, ' ton') ; end;

readkey;

end.

Решить данную задачу в Паскале через тип integer.Задача: Известна масса тела в килограммах. Определить сколько целых тонн содержится в данном числе.

Решить данную задачу в Паскале через тип integer.

Задача: Известна масса тела в килограммах. Определить сколько целых тонн содержится в данном числе.