const n = 10; type mas = array [1..n] of integer; procedure SrM(a : mas; var b : real); var i : integer; S : integer; begin s := 0; for i := 1 to n do S := S + a[i]; b := S / n; end; var a : mas; i : integer; Sr : real; begin for i := 1 to n do a[i] := -10 + random (20); SrM (a,Sr); writeln (Sr:3:2); end.
#include <iostream> using namespace std; int main() { setlocale(0,""); int a; cout<<"введите значение погоды"<<endl; cout<<"1-тепло"<<endl; cout<<"2-жарко"<<endl; cout<<"3-холодно"<<endl; cout<<"4-колотун"<<endl; cin>>a; switch (a) { case 1: cout<<"вы можете одеть джинсы и футболку"<<endl; break; case 2: cout<<"вы можете одеть шорты и майку "<<endl; break; case 3: cout<<"вы можете одеть штаны и толстовку "<<endl; break; case 4: cout<<"вы можете одеть куртку и свитер с подштанниками и ватными штанми "<<endl; break; } return 0; }
const
n = 10;
type
mas = array [1..n] of integer;
procedure SrM(a : mas; var b : real);
var i : integer;
S : integer;
begin
s := 0;
for i := 1 to n do
S := S + a[i];
b := S / n;
end;
var
a : mas;
i : integer;
Sr : real;
begin
for i := 1 to n do
a[i] := -10 + random (20);
SrM (a,Sr);
writeln (Sr:3:2);
end.