2. составьте программу, определяющую, является ли - вопрос №27492364 от Nastyakk7 19.04.2022 18:45

Question

Информатика: 2. составьте программу, определяющую, является ли сумма цифр данного четырехзначного числа n четным числом. в паскале, большое.

Nastyakk7 · Answer

Var a,b,c,d,i,n,s:integer;beginwriteln( vvedite n );readln(n);for i:=1000 to 9999 dobegina:=n div 1000;b:=n div 100 div 10 mod 10;c:=n div 100 mod 10;d:=n mod 10;end;s:=a+b+c+d;if s mod 2=0  thenwriteln( четно )else writeln( нечетно )end....