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

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программка не работает, обновите версию!

begin
Writeln(Abs(ReadInteger) mod 10=3)
end.

Образцы
2453
True

-106463
True

4353421
False

Олег Рудавин 2019-08-20 07:56:02

просто нам нельзя почему-то делай в дну строку .

Дарина 2019-08-20 08:02:34

Не спрашивай почему , сам не знаю

Сидоренков Тимур 2019-08-20 08:03:27

не знаю=)\

Валентина 2019-08-20 08:06:13

=)))

Эвелина 2019-08-20 08:07:27

ага

Valek 2019-08-20 08:14:31

Понятно

Арина · Answer 2 · 2019-08-20 07:57:29+3:00

Арина 2019-08-20 07:57:29

Var x,y:integer;
Begin
Write('Введите число: ');
Readln(x);
If x mod 10 = 3 then Writeln('Да')
else Writeln('Нет');
End.

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

Арсений Коротяев 2019-08-20 08:06:32

А ты сможешь сделать пожалуйста 2-ое

Жека Кемельман 2019-08-20 08:07:45

https://znanija.com/task/26629359

Esenija Lelchuk 2019-08-20 08:14:58

Сделай пожалуйста

О проекте

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

Добро пожаловать!