Составьте программу построения изображения с использованием процедуры Square

юра из новгородатоля из москвы

алеша из томска

коля из перми

витя из санкт-петербурга 

var

  x: real;

begin

  readln(x);

writeln(x: 0: 0);

end.

1)

германия берлин

греция афины

испания мадрид

польша варшава

франция париж

2)

греция афины

германия берлин

польша варшава

испания мадрид

франция париж