Tewyn
4 год назад
написать программу, которая находит целую часть и остаток от деления целого числа на 2
ОТВЕТЫ
Panajot
Oct 24, 2020
var
a,b: integer;
begin
read(a);
b:=a mod 2;
a:= (a-b) div 2;
write ('Остаток от деления: ',b,' Целая часть: ',a);
end.
a,b: integer;
begin
read(a);
b:=a mod 2;
a:= (a-b) div 2;
write ('Остаток от деления: ',b,' Целая часть: ',a);
end.
800
Смежные вопросы: