Предмет: Информатика,
автор: Hasan9
Написать программу, позволяющую по последней цифре числа определить последнюю цифру его квадрата
Ответы
Автор ответа:
0
var x: integer;
begin
readln(x);
x := x mod 10;
x := sqr(x);
x := x mod 10;
writeln(x);
end.
А это сокращённо:
var x: integer;
begin
readln(x);
writeln(sqr(x mod 10) mod 10);
end.
begin
readln(x);
x := x mod 10;
x := sqr(x);
x := x mod 10;
writeln(x);
end.
А это сокращённо:
var x: integer;
begin
readln(x);
writeln(sqr(x mod 10) mod 10);
end.
Интересные вопросы
Предмет: История,
автор: thebogdanbondar
Предмет: Английский язык,
автор: kozonazarovadil123
Предмет: Русский язык,
автор: sabinaaminova11
Предмет: Алгебра,
автор: Kanina
Предмет: Математика,
автор: Верона5111