Паскаль. среди 4-значных чисел. определить сколько счастливых , т.е. сумма 1 и 2 числа = сумме 3 и 4 и вывести

Question

Информатика: Паскаль. среди 4-значных чисел. определить сколько счастливых , т.е. сумма 1 и 2 числа = сумме 3 и 4 и вывести их на экран.

Лиза13061 · Answer

vara,b,i,k:integer;begink:=0;for i:= 1000 to 9999 dobegin  a:= i div 100;  b:= i mod 100;  if ((a div 10)+(a mod 10))=((b div 10)+(b mod 10)) then k:=k+1;end;writeln( Счастливых чисел: ,k);end....

Паскаль. среди 4-значных чисел. определить сколько "счастливых", т.е. сумма 1 и 2 числа = сумме 3 и 4 и вывести их на экран.

Популярные вопросы