1)команда,результат:36,команда×2,результат ;72,команда,результат:7
1) Нет (неверно)
2) Да (верно)
3) Да (верно)
4) Нет (неверно)
5) Да (верно)
6) Да (верно)
7) Да (верно)
8) Нет (неверно)
Const n=20;
Var i, k:integer ;s:real ;
A:array [1..200]of Integer ;
Begin
S:=0;
For i:=1 to N do begin
Write(' ') ;
a[i]:=random(41)+150;
S:=s+a[i];
Writeln(' ', a[i]) ;
End;
S:=s/n;
For i:=1 to N do begin
If(a[i] >s) then k:=k+1;
End;
Writeln ( ' ', k) ;
End.
Процессор
так как: устройства ввода это клавиатура, оперативная память это память, устройства вывода :колонки