Написать программу печатающую числа от 4 до 9 и рядом с каждым из них-его квадрат.
Var i:integer; begin for i:=4 to 9 do writeln(i,' ',i*i); end.