Предмет: Информатика, автор: wwwee

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

Ответы

Автор ответа: varscat
0

program test;
var number, temp: integer;
begin
   write('Enter the number: ');
   readln(number);

   temp:=number mod 10;

   writeln(temp);
   writeln(temp, ' ^ 2 = ', temp*temp);

   readln;
end.

Похожие вопросы