Решить задачу: Билет называют "счастливым", если в его номер сумма первых трёх цифр равна сумме последних трёх. Подсчитать число тех "счастливых" билетов, у которых сумма трёх цифр равна 13.

egorhoyrovegiror egorhoyrovegiror    1   18.04.2020 17:17    2

Ответы
NerminJaleÇiçek NerminJaleÇiçek  13.10.2020 11:30

uses crt;

var a,b,c:byte;

   d:word;

begin

clrscr;

d:=0;

for a:=0 to 9 do

for b:=0 to 9 do

for c:=0 to 9 do

if a+b+c=13 then d:=d+1;

d:=d*d;

write('Kolichestvo schasctlivih biletov=',d);

readln

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика