Можете подсказать , в чём тут ошибка? Program School;
Var
z, e, n, t, i: integer;
Begin
z:=0;
e:=0;
Writeln ('Введите четырехзначное число');
Readln (t);
For i:=1 to 1 do
Begin
ni=t Mod 10;
ti=t Div 10;
If n Mod 2 = 0 Then e:= e+1 else z:= z+1
end;
Write ('Четные цифры', e, 'Нечетные цифры',z);
end.

141

185

Посмотреть ответы 1

Ответы на вопрос:

shmklevdima

История

4,7(14 оценок)

Крещение руси в 988-989 гг. князь владимир провел вторую религиозную реформу. в качестве новой религии и было принято христианство. в результате посещения посольствами разных государств, бесед с проповедниками мусульманства из волжской болгарии, иудейства из хазарии, католичества «из немцев» и православие из византии князь владимир якобы выбрал православие. летописец в «повести временных лет» объясняет выбор новой веры по византийскому образцу красотой византийского богослужения, поразившей послов: «и пришли мы в греческую землю, и ввели нас туда, где служат они богу своему, и не знали – на небе или на земле мы, ибо нет на земле такого зрелища и красоты такой, и не знаем, как сказать об этом, знаем только, что пребывает там бог с людьми и служба их лучше, чем во всех других странах. не можем мы забыть красоты той, ибо каждый человек, если вкусит сладкого, не возьмет горького, так и мы не можем уже пребывать в язычестве». красота византийского богослужения, и ее эстетический эффект заставили послов предпочесть христианскую веру византийского образца.