Так понимаю, требуется вывести на экран последнюю цифру числа А. Обе программы верны. Различия лишь в том, что в первой программе мы создаём отдельную переменную, в которую записываем последнюю цифру числа а; а во второй программе мы просто меняем значение переменной а, записывая в нее последнюю цифру числа (ничего не изменилось, просто не пользуемся лишними переменными).
Var q,i,s:integer;
begin
readln(q);
s:=0;
i:=0;
while s<q do
begin
i:=i+1;
s:=s+i;
end;
if s=q then writeln('Страница = ',i+1)
else writeln('Ошибка ввода');
end.
Пример:
5
<span>Страница = 6</span>
x = int(input("Enter number: "));
print(x)
print(x + x)
print(x ** 2)
print(x - 2)