Задание 15 Урок 13.1
Primary tabs
Задание 15 Урок 13.1
С помощью вложенных циклов выведите на экран таблицу деления чисел от 1 до 9.
var i,i1: integer; begin i := 1; i1 := 1; for i := 1 to 9 do begin for i1 := 1 to 9 do begin writeln((i * i1), ' / ', i,' = ', ((i * i1) div i)); end; writeln(); end; readln(); end.
- Log in to post comments
- 549 reads