E:\*.*
A:\<span>economics.*
C:\??????.xls
J:\T??.*</span>
5 итераций цикла for, на каждой значение переменной s увеличивается на 7: s = 7 + 7 + 7 + 7 + 7 = 35
Program math;var a: real;var i,n: integer;begina:=1;readln(n);for i:=1 to n dobegin a:=a+(1/i);end;writeln(a);end.
Программа на паскале:
var x,y,v:real;
begin
readln(x,y);
if x>1
then if y>1 then v:=x+y else v:=x-y
else if y>0 then v:=-x+y else v:=-x-y;
writeln('v = ',v);
end.
Пример:
5 -1
v = 6
<span>word - абзац -отступы и интервалы(у меня сразу написанно межстрочный интервал) - интервал
</span>