Предмет: Информатика, автор: ternovka1721

нужно найти счастливое число, счастливым число называется если сумма первых трёх цифр равна сумме последних трёх цифр и эти суммы являются чётными ,проверьте на ошибки
program swan_1;
var y,z,c,d,p,f:integer;
writeln('введите шестизначное число');
readln(y);
z:=y div 100000;
b:=(y div 10000)mod 10;
c:=(y div 1000)mod 10;
d:=(y div 100)mod 10;
p:=(y div 10)mod 10;
f:=y mod 10;
j:=z+b+c;
u:=d+c+f;
if(j=u)and(j mod 2=0)and (u mod 2=0) then writeln('счастливое число')
else writeln('несчастливое число')
end.

Ответы

Автор ответа: petyaGavrikov
0
program swan_1;
var y,a,b,c,d,e,f,s1,s2:integer;
begin
writeln('введите шестизначное число');
readln(y);
a:=y div 100000;
b:=(y div 10000)mod 10;
c:=(y div 1000)mod 10;
d:=(y div 100)mod 10;
e:=(y div 10)mod 10;
f:=y mod 10;
s1:=a+b+c;
s2:=d+e+f;
if(s1=s2)and(s1 mod 2=0)and (s2 mod 2=0)
 then writeln('счастливое число')
 else writeln('несчастливое число')
end.

Пример:
введите шестизначное число
143026
счастливое число
Похожие вопросы
Предмет: История, автор: nikitamurzin019
Предмет: Алгебра, автор: vanikin510
Предмет: Қазақ тiлi, автор: aiaukenaiau
тжб
текст:Мәтін оқып, оның негізгі ойын сақтай отырып, қарапайым тезис жазыңыз. Мәтін абзацстары мен күрделі сөйлемдердің негізгі ойын ықшамдап, жай сөйлем түрінде ұсыныңыз. Сөз көлемі –шамамен 150-170 сөз.



Қазақстандағы туризм түрлері

Қазақстан экологиялық туризмнен бастап iскерлік туризмге дейін туризмнің барлық түрлерiнің дамуы үшiн елеулi әлеуетке ие. Бұған халқымыздың бай тарихы мен еліміздің аумағында сақталып қалған тарихи ескерткiштер мен археологиялық орындардың жиыны үлкен мүмкiндiк туғызады. Ерекше географиялық жағдайдың арқасында Қазақстаннан адам аяғы баспаған табиғаттың ғажайып бұрыштарын табуға болады. Бұл туристтiк инфрақұрылым дамуының, визалық режимнің үнемі жетілдіріліп отыруының және басқа да жағдайлардың негізінде жүзеге асады.

Қазақстанда бүгiнгi күні туризмнің келесi түрлерi жетiліп келеді:
25 баллов ‍