Что будет результатом выполнения фрагмента программы: k: =0; for i: =1 to n do if a[i]> 0 then k: =k+1;

214

459

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

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

horki1

Информатика

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

Неизвестно, недостаточно данных. не известно число n и массив а

agibalovaksyu

Информатика

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

// pascalabc.net var y,x,n: real; begin write('введите n: '); readln(n); while (x < = n) do begin writeln('y = ', sin(x)*cos(x)); x: =x+0.1; end; end. проверка: введите n: 1 y = 0 y = 0.0993346653975306 y = 0.194709171154325 y = 0.282321236697518 y = 0.358678045449761 y = 0.420735492403948 y = 0.466019542983613 y = 0.49272486499423 y = 0.499786801520753 y = 0.486923815439098 y = 0.454648713412841