Ввести с клавиатуры целое число вывод на экран верноли это введеное число оканчивается на 3

Question

Информатика

Валерьян

22 марта, 21:29

Ввести с клавиатуры целое число вывод на экран верноли это введеное число оканчивается на 3

+1

Ответы (1)

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

Николя · Answer 1

Var x, y:integer;

Begin

Write ('Введите число: ') ;

Readln (x) ;

If x mod 10 = 3 then Writeln ('Да')

else Writeln ('Нет') ;

End.

После Writeln ('Да') точка с запятой НЕ нужна!