Ответ:
Объяснение:
1) program z1;
var a,sum:integer;
begin
a:=0;
sum:=0;
while (a<0) or (a=0) do
begin
sum:=sum+a;
readln(a);
end;
writeln(sum);
end.
2) program z2;
const N = 10;
var i:integer;
var b,d:real;
var a:array[1..N] of integer;
begin
for i:=1 to N do
readln (a[i]);
for i:=1 to N do
write(a[i]:4);
writeln;
for i:=1 to N do
begin
b:=sqrt(a[i]);
d:=frac(b);
if d=0 then
write (a[i]:4);
end;
end.
Наливаете полный сосуд 5 литров и переливаете в сосуд 7 литров. в сосуде 7 литров останется 2 свободных литра, потом вы наливаете полный сосуд 5 литров и переливаете в сосуд 7 литров.в сосуде 7 литров останется 4 свободных литра, потом наливаете полный сосуд 5 литров и переливаете в сосуд 7 литров. в сосуде 7 литров будет налит 1 литр, потом наливаете полный сосуд 5 литров и все. в сосуде7 литров будет один литр, а в сосуде 5 литров будет 5литров.
В i2 напиши команду =ЕСЛИ(C2="15 июня";1;0) и растяни вниз, после чего в F2 напиши =ЕСЛИ(I2=1;E2;0) это все кто сдавал, после чего выдели столбик и нажми среднее значение, точно такую же операцию проверни с историей, замени 15 июня на история
Ответ: АС873 = <span>2163</span><span>
Е2 = 226
</span>