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

Задано двухзначноечисло найдите произведение между кольчеством дестков и едниц

Ответы

Автор ответа: Аноним
0
var
n:integer;

begin
Read(n);
Writeln((n div 10)*(n mod 10))
end.
Автор ответа: DonPedro80
0
PascalABC.NET 3.4

begin
  var n := ReadInteger;
  Writeln((n mod 10)*(n div 10))
end.
Интересные вопросы
Предмет: Алгебра, автор: masha01021
Предмет: Окружающий мир, автор: annadidur012