Регистрация
Rayana555
04.11.2022 07:27
Информатика
Есть ответ 👍

Дан массив из 10 элементов. преобразовать массив, прибавив к нечётным элементам единицу.пример массива: 1 2 3 4 5 6 7 8 9 10.

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

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

asdgvhmh
asdgvhmh
4,8(88 оценок)
Program znanija; var  i,n: integer; a: array[1..10] of integer; beginfor i: =1 to 10 do begin  writeln('введите ',i,'-ый элемент массива');   read(a[i]);   if a[i] mod 2 = 1 then a[i]: =a[i]+1;   end; writeln; writeln;   writeln('новый массив: '); for i: =1 to 10 do    writeln(a[i],'(',i,')'); end.    
popovaadelina20
popovaadelina20
4,4(55 оценок)

begin

  var x: =readreal();

  if(x< =-4) then

    print(0)

  else if((x> -4) and (x< =6)) then

    print(sin(x)**2)  

  else if((x> =6) and (x< =20)) then

    print(x**(1/3))

  else if(x> 20) then print((sin(x)**2)/2);

end.

Популярно: Информатика