Задача 13.1 Урок 1
Primary tabs
Выведите на экран таблицу умножения используя только циклы вида repeat/until.
Начинаться вывод таблицы должен как-то так:
▶
?
1
2
3
1x1 = 1
1x2 = 2
......
program u131z1; var a,i,j: integer; begin i:=1; repeat j:=1; repeat begin write(i, '*', j, '= ', i*j, ' '); j:= j +1; end; until (j >9); i:=i + 1; until(i > 9); readln(); end.
- Log in to post comments
- 236 reads