Написать к этому коду блок схему! var a,b: integer; begin writeln ('введите число'); readln(a); repeat a: = a div 10; inc(b); until a=0; writeln ('кол-во цифр = ',b); end.

diduhalinamal    1   28.09.2019 08:30    0