#include <iostream>
using namespace std;
int main()
{<span>
int a,s;</span><span>
a=1;</span><span> s=0;</span><span>
while (a!=0)
{</span><span>
cin>>a;</span><span>
s=s+a;</span><span>
}</span><span>
cout<<s;
</span>return 0;
}<span>
</span>
Курсóр ( указатель, стрелка прибора) — экранная пометка, показывающая:
место на экране, где появится следующий символ (текстовый курсор или англ. caret /ˈkærət/)
текущую позицию, к которой будет применяться действие мыши или её аналогов, включая дигитайзер (графический планшет), и других манипуляторов — джойстика и т. п.
Var a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do begin
a[i]:=random(0,20);
write(a[i]:3);
if(odd(a[i])) and (not odd(i)) then a[i]:=0;
end;
writeln();
for i:=1 to 10 do
write(a[i]:3);
<span>end.</span>
Это очень логическая задача попробуй включить логику и может получится если у тебяя вообще логика есть
Var n,i,k:integer;
a:array[1..4096] of integer;
begin
readln(n);
for i:=1 to n do
begin
readln(a[i]);
if (a[i]<=2) and (a[i]>0) then k:=k+a[i];
end;
writeln('Summa = ',k);
<span>end.</span>