Напишите программы для решения задач. Используйте операции div и mod:

1) Дана масса в граммах. Переведите её в килограммы и граммы

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

Question

Информатика

Гема

6 марта, 05:54

Напишите программы для решения задач. Используйте операции div и mod:

1) Дана масса в граммах. Переведите её в килограммы и граммы

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

+5

Ответы (1)

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

Фебния · Answer 1

1)

var

a:integer;

begin

Readln (a) ;

Writeln (a div 1000, 'кг ', a mod 1000, 'гр') ;

end.

Пример:

1234

1 кг 234 гр

2)

var

a:integer;

begin

Readln (a) ;

Writeln (a/10000, ' км. кв.') ;

end.

Пример:

100

0.01 км. кв.