Определить последнюю цифру заданного целого числа в pascal
Определить последнюю цифру заданного целого числа в pascal
Гость
Ответ(ы) на вопрос:
Гостьvar s,t:integer;
begin
write ('s='); readln(s);
if (s>-10) and (s<10)
then writeln ('Число однозначное')
else begin
t:=s mod 10;
writeln (abs(t));
end;
end.
Не нашли ответ?
Похожие вопросы