Ответы на вопрос:
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
Популярно: Информатика
-
буля410.01.2023 05:04
-
Anytohka0cosmos11.04.2021 23:29
-
lobodapo01.06.2022 01:08
-
givka124.01.2021 11:16
-
qweuio23.03.2021 18:47
-
Raulikx25.06.2022 11:50
-
Wulfmax18.02.2021 08:28
-
Kirito50515.05.2022 18:07
-
mirnillas04.04.2023 10:19
-
Ryfili23.12.2022 04:25