Блокнот - самой простой текстовый редактор с мизерным количеством возможностей, а wordpad более навороченный редактор с большим количеством возможностей
1.Переменная c не real а integer;
2.Переменная d не real а integer.
//"Школьный" вариант, блок-схема во вложении
//Pascal ABC.NET v3.0 сборка 1111
Var
s,n,i:integer;
begin
readln(n);
s:=0;
for i:=1 to 3 do
begin;
s:=s+n mod 10;
n:=n div 10;
end;
if s mod 2=0 then writeln('Yes') else writeln('No');
<span>end.
Пример ввода:
123
Пример вывода:
Yes</span>
/<u>/ PascalABC.NET 3.3, сборка 1634 от 14.02.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadReal('Введите число:').ToString.ToWords('.');
if a.Length=2 then Writeln(a[0]=a[1])
else Writeln(False);
end.
<u>Примеры</u>
Введите число: 121.121
True
Введите число: 12.11999
False