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

Дано двузначное число. Найти произведение его чисел программа

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

Берём двузначное число. Делим его на 10 и забираем остаток. Остаток присваиваем новой переменной. Старую переменную с числом мы умножаем на новую. Всё.
В Pascal это выглядит так:
Var a,b:integer;
Begin
 readln(a);
 b:=a mod 10;
 a:= a div 10;
 a:=a*b;
 writeln(a);
End.