Переделать с цикла while на цикл repeat! и ещё сделать блок схему по циклу repeat. вот программа которую нужно переделать: program while20; var n,n1: integer; begin write('введите число n'); readln(n); while (n> 0) and (n1< > 2) do begin n1: =n mod 10; n: =n div 10; end; if n1=2 then writeln('true') else writeln('false'); end.

Egorjava    3   17.05.2019 16:27    1