Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

// PascalABC.NET 3.0, сборка 1144 от 16.01.2016
begin
  var d:=ReadInteger(n=) mod 10;
  Writeln(d,#13#10,sqr(d));
end.

Тестовое решение:
n= 346427
7
49