Program n1;
var i:integer;
a:array[1..12] of real;
s:real;
begin
s:=0;
for i:=1 to 12 do
begin
a[i]:=7-3*i;
s:=s+a[i];
end;
writeln(s);
end.<span>
</span>
#include <iostream>
using namespace std;
int main()
{
int n, p, i;
string m;
cout << "Введите n: ", cin >> n, cout << "\n";
for (i=2; (i<=5)&&((n<100)or(n>999));i++) {
cout << "Введите n: ", cin >> n, cout << "\n";
}
if ((n>=100)and(n<=999)){
p = (n/100)*(n/10%10)*(n%10);
cout << p;}
else cout << "Ошибка";
return 0;
}
Пример:
<span>Введите n: 12
Введите n: 7623
Введите n: 456
120</span>
28800 бит/с = 3600 байт = 3,515625 Кб
Ответ: <span>а)3600 байт</span>
var
l,x,sum:real;
i:integer;
begin
write ('L = ');
readln(l);
write ('X = ');
readln(x);
i:=1;
sum:=0;
while i<=101 do
begin
sum:=sum+exp((x+i)*ln(l))/i;
i:=i+2;
end;
writeln ('Summa: ',sum);
readln;
end.
У первых название двухкрылки,состав:крылья,усы,брюшко,лапки действия:летать,шевелить усами,охотиться.У вторых название двуххвостки состав: хвосты,усы,лапки,брюшко,крылья действия тоже самое что и у первых