Нужно вывести на экран натуральные числа и их квадраты до указанного целого числа n

Паскаль: 
uses GraphABC;
var  a: integer;  
begin 
read(a); //спрашиваем до какого числа выводить 
for var i := 1 to a do 
begin   
println('Число: ' + i + '. Его квадрат: ' + sqr(i) + ';'); 
end;
end.

Не особо знаю паскаль, так что дабы не накосячить с синтаксисом, покажу на примере. Тут всё просто - тебе лишь нужен цикл For и расчет процентов.

FOR i = 1 TO 100
percents = FIX(x * p / 100) ' здесь у нас есть переменная percents, которой присваиваются округленные функцией fix проценты (насколько я знаю, в паскале аналогичная функция называется Round)
x = x + percents 'тут всё понятно - переменной X присваивается она сама и годовые проценты по вкладу
IF x >= y THEN 'проверяем, не равен или не превысил ли наш вклад ожидаемую сумму
PRINT i 'в цикле For можно не заморачиваться с отслеживанием лет, переменная i сама подсчитает количество итераций-лет
END 'завершаем программу
END IF
NEXT i ' конец цикла
Можно ещё чисто для себя добавить в условие вывод переменной X, чтобы было нагляднее.  

Оба устройства, как планшет, так и смартфон очень похожи друг на друга, но по изначальной задумке производителей, они предназначены для несколько разных задач.Самое первое отличие это размер,планшет практически в раза 2 больше смартфона, соответственно экран будет тоже больше что есть один из плюсов.Так как есть меньше шанс посадить зренее так как экран телефона меньше чем планшета.

Отличия так же и в параметрах, в смартфоне они чаще всего выше и производительнее, тогда как планшеты обладают более простыми характеристиками. Смартфон по своей сути – телефон для звонков и связи, а планшет – устройство для интернета, просмотра видео и так далее.

Самым главным программным инструментом для смартфонов и планшетов является операционная система. Для большинства обоих видов гаджетов используется система Android. Вообде она ничем не отличается ни на смартфоне, ни на планшете. Но вот оптимизация, всё-таки, на обоих устройствах несколько разная. Отличаться будут так же и фирменные оболочки от разных производителей, но не значительно.