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