Question

Дано трехзначное число N. Проверить, будет ли сумма его цифр четным числом. Кто может, напишите пожалуйста алгоритм решения для программы Паскаль

Answer 1

var a,b,c,k:integer;
begin
read(a); c:=10; b:=0;
for k:=1 to 3 do begin
b:=b + a mod c; c:=c+10; end;
if (b mod 2= 0) then write ('Norm') else write ('Nechetnoe');
end.

Answer 2

Мы такое еще не проходили, всм "do","for"

Answer 3

аххах я уже решила