1. Среди трехзначных чисел сколько таких, что сумма крайних в три раза больше средней цифры. 2.Среди трехзначных чисел сколько таких, что все цифры разные

Question

1. Среди трехзначных чисел сколько таких, что сумма крайних в три раза больше средней цифры. 2.Среди трехзначных чисел сколько таких, что все цифры разные

Гость

Ответ(ы) на вопрос:

Accepted Answer

1) program z1; uses crt; var a,b,c,d,e,f,k,i: integer; begin for i:=100 to 999 do begin a:=i div 100; b:=i mod 100 div 10; c:=i mod 100 mod 10; d:=a+c; e:=3*c; if d>e then innc(k); end; writeln(k); end.