Используя все цифры от 1 до 9 по одному разу в различных комбинациях и операции сложения и вычитания,получить в сумме 100. Паск

Question

4 года назад

9

Используя все цифры от 1 до 9 по одному разу в различных комбинациях и операции сложения и вычитания,получить в сумме 100.
Паскаль.

1 ответ:

Nabil · Answer 1 · 2020-03-18T01:34:16+03:00

Nabil4 года назад

0 0

Var A : Integer;
BeginA:= 9+9;A:= A+8+8;A:= A+7+7;A:= A+6+6;A:= A+5+5;A:= A+4+4;A:= A+3+3;A:= A+2+2;A:= A+1+1;A:= A+9-1;A:= A+8-6;Writeln(A);End.