Написать программу для нахождения целого числа. Делением, умножением. как хотите.

Question

Информатика

Стефания

13 января, 01:16

Написать программу для нахождения целого числа. Делением, умножением. как хотите.

+2

Ответы (1)

Знаете ответ?

Лианка · Answer 1

var

a:real;

begin

readln (a) ;

a:=trunc (a) ; {trunc - это такая функция (уже готовая в самой программе), которая находит целую часть числа}

writeln ('Целая часть числа а равна ', a)

end.

если я правильно понял смысл