Лучшие помощники
- Megamozg 2190 б
- Matalya1 1800 б
- DevAdmin 1695 б
- arkasha_bortnikov 860 б
- Dwayne_Johnson 845 б
27 апреля 2023 08:26
192
На языке Паскаля написать программу: Дано число. Определить, на какую цифру оно оканчивается, затем умножить его само на себя столько раз, на какую цифру оканчивается исходное число. Решить используя циклы.
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
Остались вопросы?
Еще вопросы по категории Математика
Какое значение ёмкости нужно перевести из микрофарад в фарады, если дано значение 0,0004 мкФ?...
Какова длина в дециметрах у объекта, длина которого равна 1 м 8 дм?...
А)48 + 42 · 18 : 63-56; в) (3539 + 5016-12 · 203) : 211; в столбик по действиям...
Какое произведение получится, если умножить 100 на 300?...
Что означает аббревиатура '1 кн в т'?...
Все предметы