Определить последнюю цифру заданного целого числа в pascal

MrTroLoLo10 MrTroLoLo10    3   20.06.2019 10:40    1

Ответы
ks907216 ks907216  16.07.2020 11:24
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика