Var y: array[1..12] of integer;
i,k:integer; s:real;
begin
for i:=1 to 12 do
read (y[i]);
for i:=1 to 12 do
if y[i] mod 2=0 then
begin
s:=s+y[i];
k:=k+1;
end;
s:=s/k;
write (s:5:1);
end.
Дано:
v= 28880 бит\с
k= 100*30*60 = 180000 символов
i= 1 байт = 8 бит
Найти:
t=?
Решение:
I= v*t
t= I\ v
t= k*i \ v
t= 180000 * 8 бит \ 28800 бит\с
t= 50 с
Ответ: 50 с
Если речь о Паскале, то после case может следовать переменная порядкового или строкового типа.
Получилось так, что чертежник, после выполнения данной команды, оказался в исходной точке. прошу прощения, если это не правильный ответ
#include <iostream>
using namespace std;
int main()
{
int n,m,p;
cin>>n;
int n1=n/100;
int n2=(n/10)%10;
int n3=n%10;
if (n1>n2)
if (n1>n3) {m=n1; p=1;} else {m=n3; p=3;}
else
if (n2>n3) {m=n2; p=2;} else {m=n3; p=3;}
cout<<"max="<<m<<", poz= "<<p<<endl;
system("pause");
}