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

0 голосов
67 просмотров

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


Информатика (25 баллов) | 67 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var s,t:integer;
begin
write  ('s='); readln(s);
if (s>-10) and (s<10) <br>then writeln ('Число однозначное') 
else begin   
t:=s mod 10;   
writeln (abs(t));   
end; 
end.

(996 баллов)
0

неверно

0

Напиши как верно будет