Предмет: Информатика,
автор: vudaiko
Сколько существует "счастливых" четырехзначных билетов? "Счастливым" считается билет,у которого сумма первых двух цифр равна сумме двух последних.
Ответы
Автор ответа:
0
615 чисел.
Вот программа на Паскале ABC по их вычислению:
Program bilet;
var i:integer;
s:string;
begin
for i:=1000 to 9999 do begin
s:=IntToStr(i);
if StrToInt(s[1])+StrToInt(s[2])=StrToInt(s[3])+StrToInt(s[4]) then writeln(i);
end;
end.
Вот программа на Паскале ABC по их вычислению:
Program bilet;
var i:integer;
s:string;
begin
for i:=1000 to 9999 do begin
s:=IntToStr(i);
if StrToInt(s[1])+StrToInt(s[2])=StrToInt(s[3])+StrToInt(s[4]) then writeln(i);
end;
end.
Похожие вопросы
Предмет: Математика,
автор: pereverina76
Предмет: Математика,
автор: dasaboze55
Предмет: Қазақ тiлi,
автор: maksimaldongarov663
Предмет: Биология,
автор: AsTeRisk97
Предмет: Алгебра,
автор: marina002