Turbo pascal! вычислить р , если p: =2; while - вопрос №456008421021 от вероника1062 08.12.2020 09:19

Question

Информатика: Turbo pascal! вычислить р , если p: =2; while p 10 do begin p: =2*p+1; p: =p+1 end;

вероника1062 · Answer

1. 2 10 ⇒ p=2*2+1=5, p=5+1=62. 6 10 ⇒ p=2*6+1=13, p=13+1=143. 14 10ответ: p=14...

Turbo pascal! вычислить р , если p: =2; while p< 10 do begin p: =2*p+1; p: =p+1 end;