// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
var x:=0.5;
while x<=2.1 do begin
Writeln('x=',x:3:1,' y=',tan(sin(x))+2);
x+=0.2
end
end.
<u><em>Результат выполнения программы</em></u>
x=0.5 y=2.5198809015013
x=0.7 y=2.75112025607465
x=0.9 y=2.99586604900996
x=1.1 y=3.23765167169871
x=1.3 y=3.43923041043966
x=1.5 y=3.5488600833871
x=1.7 y=3.52922062804747
x=1.9 y=3.38750383103094
x=2.1 y=3.16912357769899
После выключения питания очищается энергозависимая память. В компьютере энергозависимой является <em>оперативная</em> память.
Ответ: 24 ( прикрепила фотографию)
Program gt;
var n,q,s,k:integer;
begin
read(n);
s:=0;
k:=0;
while n>0 do
begin
q:=n mod 10;
n:=n div 10;
s:=s+q;
k:=k+1;
end;
writeln(s,' ',k);
end.
1) 31(Просто считаешь все символы + пробелы)
2)4 (32/8)
3)107