Впервый день пловец проплыл 3 км. в каждый последующий день он проплывал на 0,5 больше, чем в предыдущий день. в какой по счёту день пловец начнёт проплывать более 5 км в день.программа pascal.

152

302

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

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

emoe0zosixnc

Информатика

4,5(66 оценок)

Program plov ; var day : integer ; var km , sum : real ; begin day : = 1 ; km : = 3 ; sum : = km ; while ( sum < = 30 ) do begin day : = day + 1 ; km : = km * 1.1 ; sum : = sum + km ; end ; writeln ( 'day=' , day ) ; end.

dikushant

Информатика

4,4(33 оценок)

Program n1; const n=15; var a: array[1..n] of integer; i: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin a[i]: =random(21)-10; write(a[i],' '); if a[i]< =3 then a[i]: =sqr(a[i])*a[i]; end; writeln; writeln('полученный массив: '); for i: =1 to n do write(a[i],' '); end.