ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!!!! очень нужно!!!!!!!!!! ПОМОООГИИИИТЕЕЕЕЕЕ!!!!!!!!!!!!!!!!
Дано многоразрядное число N <=10^9. Найти частное от деления цифр числа, разряды которых равны 1 и 6.
Ответы
Ответ дал:
0
Program chastnoe;
var N, p, sh: integer;:
m: real;
begin
write(‘N=’);
readln (N);
p:= N div 1000000000;
sh:= (N div 10000) mod 10;
m:=p/sh;
writeln (‘частное=’, m);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад
9 лет назад
9 лет назад