|----------------
| |
| |
|---------------|
Program n1;
var a,b: integer;
begin
readln(a,b);
writeln('срзнач: ',(a+b)/2);
write('сргеом: ',sqrt(a*b));
end.
Var n, i: Integer;
x, sum, temp, cosx: Double;
begin
ReadLn(x, n);
sum:=0;
cosx:=cos(x);
temp:=1;
for i:=1 to n do begin
temp:=temp*cosx;
sum:=sum+temp;
end;
WriteLn(sum);
end.
Вопрос 1 точно знаю: <span>загрузочные вирусы.
</span>
? - один произвольный символ(обязательно)
*- любая или пустая последовательность символов
?ese*ie.?t* к этой маске подходит A)seseie.ttx, так как во всех остальных случаях не хватает символа к первому вопросу в файле.