Question

Вывести на экран числа от 5 до 20
Uses crt; Var N: integer; Begin For N:=5 to 20 do Writeln (N); End.
Вывести на экран числа от 30 до 10
Uses crt; Var N: integer; Begin For N:=30 downto 10 do Writeln (N); End.

№1. Составьте программу без использования команды downto, чтобы на экран выводились числа от 25 до 0 В строке For N:=0 to 25 do Writeln (_______); указать нужную формулу

№2. Составьте программу, которая выводит на экран таблицу умножения. Вам необходимо записать в команду Writeln содержимое, которое будет выводить на экран данную таблицу умножения: for N:=2 to 9 do writeln ( );