Дано целое число. напишите программу,которая выводит на экран последнюю цифру данного числа,затем возводит её в квадрат и выводит на экран монитора результат только до 7 класса я проболел эту тему на языке pascal abs

Ну - это очень просто ))) 
program test;var number, temp: integer;
begin   
write('Enter the number: '); 
 readln(number);
   temp:=number mod 10; 
 writeln(temp, '^2=', temp*temp);
readln;
end.