Ответы на вопрос:
Var x, y: integer; begin x: =11; y: =1; repeat writeln(x*y); y: =y+1; until (условие типо y=10); end. тебе нужно условие написать. если хочешь бесконечно повторять то напиши x=0
Популярно: Информатика
-
Masha12fg17.02.2020 09:59
-
lllJenyalll21.06.2021 20:52
-
Микаэла11113.04.2022 16:57
-
АрсенийТизяев24.06.2022 10:54
-
Светасветасветасвета11.05.2022 16:23
-
gorbovaekateri23.02.2020 01:25
-
olgakazakova20oy0u8c17.12.2021 19:55
-
karolinaivanova1010.01.2023 15:33
-
Ga1axI09.09.2021 17:41
-
Jeinm17.10.2021 13:49