1.
program z1;
var i,n,S: integer;
begin
write ('n = ');
read (n);
S:=0;
write ('S = ');
for i:=1 to n do
begin
write (i*2-1,'^2');
if i<n then write (' + ') else write (' = ');
S:=S + sqr(i*2-1)
end;
write (S)
end.
2.
program z2;
var i,n,S: integer;
begin
write ('n = ');
read (n);
S:=0;
i:=1;
write ('S = ');
repeat
write (i*2-1,'^2');
if i<n then write (' + ') else write (' = ');
S:=S + sqr(i*2-1);
i:=i+1
until i>n;
write (S)
end.
3.
program z3;
var i,n,S: integer;
begin
write ('n = ');
read (n);
S:=0;
i:=1;
write ('S = ');
while i<=n do
begin
write (i*2-1,'^2');
if i<n then write (' + ') else write (' = ');
S:=S + sqr(i*2-1);
i:=i+1
end;
write (S)
end.
Объяснение:
картинки
Поделитесь своими знаниями, ответьте на вопрос:
Найдите значение выражения: (1 & 0) v (0 v 1) найдите значение выражения: (1 & 0) v (0 v 1) найдите значение логического выражения ((1 v 0) v а) найдите значение выражения: ((1 v 0) v в) & (1 v a)
3) =1
4) =1