Регистрация
егор1481
14.02.2020 07:08
Информатика
Есть ответ 👍

Информатика 5 класс ​

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

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

Oclahoma
Oclahoma
4,4(58 оценок)

1робот ) не знаю

2 робот) медициналық робот

3 робот) кәсіптік робот

4 робот)?

saigafarovatn
saigafarovatn
4,4(30 оценок)

паскаль авс:

 

program maxtv; uses crt; const n=10; var  a: array[1..n] of real;   r: real;   i: integer; begin  writeln('*** alphaues is ***');   writeln('***                  ok                        ***');   writeln();   writeln('введите r, не равное 0'); readln(r);   if r< > 0 then      begin          writeln('элементы массива: ');           randomize;               for i: =1 to n do                  begin                      a[i]: =random(100)-50;                       write (a[i]: 7: 2);                   end;               writeln();               writeln('заменяем 2,4,5,9: ');               a[2]: =a[2]/r;               a[4]: =a[4]/r;               a[5]: =a[5]/r;               a[9]: =a[9]/r;               for i: =1 to n do                  write (a[i]: 7: 2)      end   else      writeln('ну вас же просили не вводить 0! ');       end.

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