Дано

целое число. Определить оканчивается ли оно цифрой 5.

Question

Кириакия

30 июня, 11:30

+2

Ответы (1)

Знаете ответ на вопрос?

Велимир · Answer 1

Uses crt;

var a: integer;

begin

readln (a) ;

a:=a mod 10;

if a=5 then writeln ('Оканчивается') else writeln ('Не оканчивается') ;

end.

Даноцелое число. Определить оканчивается ли оно цифрой 5.