Программу пришлось немного править, что б заработала
var
k, s: integer;
Dat: array[1..10] of integer;
begin
Dat[1] := 7;
Dat[2] := 9;
Dat[3] := 10;
Dat[4] := 5;
Dat[5] := 6;
Dat[6] := 7;
Dat[7] := 9;
Dat[8] := 8;
Dat[9] := 6;
Dat[10] := 9;
s := 0;
for k := 1 to 10 do
s := s + Dat[k];
writeln(s);
end.
Вывод
76
3*log(pow(pow(sin(x),2)+2),1/5)
Я так понимаю, нужно число страниц найти.
9408 / (log2(256) / 8 * 28 * 48) = 7 страниц.
<span>Var a, b, c, p :longint;
begin
WriteLn('Введите первую сторону треугольника a');
readLn(a);
WriteLn('Введите вторую сторону треугольника b');
readLn(b);
writeLn('Введите третью сторону треугольника c');
readLn(c);
p:=(a+b+c);
writeLn('Периметр треугольника равен ', p);
end.</span>
#include <iostream>
using namespace std;
#define N 10
int main()
{
int array[10] ={1,2,3,4,5,6,7,8,9,10};
int sum=0;
for(unsigned int i=1;i<N;i+=2)
sum+=array[i];
cout<<sum<<endl;
return 0;
}
Раз не указан язык, пусть будут плюсы