За тези, които се занимават с програмиране (Pascal)

[Gabichkaaa]

Тук с един съученик се мъчим къде ни е грешката в това: " Да се напише програма, коята въвежда едно число цяло положително и определя дали последната му цифра е 0'.

program nula;
Var ch,x:real;
Begin
WriteLn('vavedi chislo');
ReadLn(ch);
x := ch mod 10;
If x = 0 then
writeln('chisloto zavur6va na 0')
else
WriteLn('chisloto ne zavur6va na 0');
end.