По текст на паскале. среди чисел последовательност 1 , 2 , 4 , 8 , 16 , найдите количество чисел до первого шестизначного .

177

422

Посмотреть ответы 2

Ответы на вопрос:

Lelechk

Информатика

4,7(98 оценок)

Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin seqwhile(1,t-> 2*t,t-> t< 100000).count.println end. результат 17

ms002

Информатика

4,6(25 оценок)

Program summa; uses crt; const n =10; var b: array[1..n] of integer; s,i : integer; begin s: =0; for i: =1 to n do begin write( 'b[ ' ,i, ']= ' ); readln(b[i]); s: =s+b[i]; end; writeln( 's=' ,s); end.