ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!!!! очень нужно!!!!!!!!!! ПОМОООГИИИИТЕЕЕЕЕЕ!!!!!!!!!!!!!!!!
Дано многоразрядное число N <=10^9. Найти частное от деления цифр числа, разряды которых равны 1 и 6.
Дано многоразрядное число N <=10^9. Найти частное от деления цифр числа, разряды которых равны 1 и 6.
More Questions From This User See All
Answers & Comments
Verified answer
Var a,a1,a6:longint;begin
write('a = ');
readln(a);
a1:=a mod 100 div 10;
a6:=a mod 10000000 div 1000000;
writeln('a1 = ',a1,' a6 = ',a6);
if a6<>0 then writeln(a1/a6);
end.
Пример:
a = 12354645
a1 = 4 a6 = 2
4/2= 2