Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
read (n);
i : = 1;
repeat
writeln(i*i);
i : = i + 1;
untill i*i > n
иванов - парикмахер
петров - плотник
сидоров - мельник
гришин - почтальон
алексеев маляр
Популярные вопросы