Ответы на вопрос:
Не уверен, но надеюсь правильно) var a,b,cmod,cdiv: integer; begin readln(a); readln(b); cmod: =a; cdiv: =0; repeatcmod: =cmod-b; inc(cdiv); until cmod< b; writeln(cdiv,' ',cmod); readln; end.
Популярно: Другие предметы
-
namik240424.07.2021 15:38
-
нурана402.04.2020 01:39
-
vikaprovotorova15.03.2023 05:15
-
alisavakhnina107.11.2022 23:21
-
daria003ss202.12.2022 18:36
-
fedosovdenis2811.05.2020 12:44
-
Мария2068414.09.2022 04:17
-
marystuart2119.12.2021 00:28
-
Аааа111111111117.11.2020 04:36
-
bbb7018.10.2020 11:15