45

Определить произведение первой и последней цифры числа…

livter777 21 февраля 2023

Определить произведение первой и последней цифры числа, вводимого с клавиатуры

категория: информатика

78

VarA,p: integer; beginWrite ('Введиnе число: '); Readln (A); p: =A mod 10; while A > 9 doA: =A div 10; p: =p*A; WriteLn (p); Readln; end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...