Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 865 б
27 апреля 2023 08:26
269
На языке Паскаля написать программу: Дано число. Определить, на какую цифру оно оканчивается, затем умножить его само на себя столько раз, на какую цифру оканчивается исходное число. Решить используя циклы.
1
ответ
Вот решение задачи на языке Паскаль:
```
program ending_digit;
var
num, ending_digit, result: integer;
i: integer;
begin
write('Введите число: ');
readln(num);
ending_digit := num mod 10; // определяем последнюю цифру числа
result := num;
for i := 1 to ending_digit do
begin
result := result * num; // умножаем число само на себя ending_digit раз
end;
writeln('Число ', num, ' оканчивается на цифру ', ending_digit);
writeln('Результат: ', result);
end.
```
Программа сначала запрашивает у пользователя число, затем определяет на какую цифру оно оканчивается. Далее запускается цикл, который умножает число само на себя столько раз, на сколько оканчивается исходное число. Результат выводится на экран вместе с информацией о последней цифре исходного числа.
```
program ending_digit;
var
num, ending_digit, result: integer;
i: integer;
begin
write('Введите число: ');
readln(num);
ending_digit := num mod 10; // определяем последнюю цифру числа
result := num;
for i := 1 to ending_digit do
begin
result := result * num; // умножаем число само на себя ending_digit раз
end;
writeln('Число ', num, ' оканчивается на цифру ', ending_digit);
writeln('Результат: ', result);
end.
```
Программа сначала запрашивает у пользователя число, затем определяет на какую цифру оно оканчивается. Далее запускается цикл, который умножает число само на себя столько раз, на сколько оканчивается исходное число. Результат выводится на экран вместе с информацией о последней цифре исходного числа.
0
·
Хороший ответ
27 апреля 2023 08:27
Остались вопросы?
Еще вопросы по категории Математика
Квадратный лист бумаги со стороной 2 дм разрезали на пять равных частей прямоугольной формы.Найди площадь одной части. Реши задачу двумя способами....
Чему равно количество дециметров в 1 метре?...
Математика 6 класс, срочно помогите решить пример...
Сколько миллиграммов в 10 граммах?...
Сколько будет 0,2(x-3)=0,4(7-x)-4,6...