Составить программу на паскале. агент 007 узнал, - вопрос №0071921441 от palos3323 23.12.2022 14:35

Question

Информатика: Составить программу на паскале. агент 007 узнал, что в секретном сейфе трёхзначный код, в котором все три цифры разные.при этом средняя цифра равна разности крайних цифр. составить программу, которая напечатает для него все такие числа.

palos3323 · Answer

Var a,b,c,d:integer;begind:=a+b*10+c*100;for d:=100 to 999 dobeginif b=a-c or b=c-a then writeln (d);end;end....