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

1

Ответы и объяснения

  • kefa
  • главный мозг
2013-05-05T16:19:13+00:00

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

 

 

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