Question

Напишите программу в Паскале, которая выводит на экран таблицу умножения на 7

Answer 1

Program tabl;

var

i, n: integer;

 

begin

write('chislo = ');

readln(n);

 

for i:= 1 to n do

writeln(i,'*','7 = ',(i*7));

readln;

end.