Лариса Хохлова
Лариса Хохлова

Нужна помощь в решении задачи в паскали ветвление!

Составить программу , позволяющую по последней цифре данного числа определить последнюю цифру куба этого числа

ТК
Татьяна Крылова

Ни какого смысла в ветвлении нет:

var
N : Integer;
begin
Write('Введите число: '); ReadLn(N);
N := N mod 10;
WriteLn('Последняя цифра куба данного числа = ', (N * N * N) mod 10);
end.

ЮГ
Юля Глазырина

Наймите репетитора. Он вас все ваши мегасложные задачи сделает и обьяснит.

Jurii Мне почему-то кажется, что в задании было как раз сказано про кейс, то есть ваше решение верное, но не по заданию 🙂

Эльдар
Эльдар

Берёшь последнюю цифра числа, возводишь эту цифру в куб, потом от результата опять берёшь послендюю цифру.
Сделаю за 50 рублей на WMR кошелёк)

Jurii, эх, тыыы :DDD

НЛ
Наталья Луканина

program dypa;
var
Const : Integer;
begin
Write('Число- '); Readln(Const);
Const := Const mod 10;
Writeln('Последняя цифра куба данного числа = ', (Const *Const * Const) mod 10);
end.

Похожие вопросы
помогите решить задачу на ветвление. Срочно!!!
решение задачи. помощь нужна
Нужна помощь с решением задачи....
Нужна помощь по решению задачи.
Помощь в решении задачи на Pascal.
Delphi. Решение задач. Нужна помощь
Нужна помощь в решении задачи в С++
Нужна помощь в решении задачи по С++
Нужна помощь в решении задачи в паскали!
Нужна помощь в решении задачи по программированию