Var A:array[1..15] of integer;
i:integer;
Begin
For i:= 1 to 15 do
Begin
A[i]:=random(20)+1;
Write(A[i],' ')
End;
WriteLn;
For i:= 1 to 15 do
Begin
if A[i]<10 then A[i]:=A[i]*2;
Write(A[i],' ')
End;
End.
V = 800*600*4 = 1920000 бит = 240000 байт ≈ 234,38 Кб
Для почты она может и не нужной, но ей научились пользоваться
Если переменной s присвоили значение 100 то она равна ему ведь над ней не одного действие не происходило
#include<iostream>#include<stdlib.h>using namespace std;int main(){ int n,i,j=0,k; cin>>n; int a[n]; for(i=0;i<n;i++) { cin>>a[i]; } int X; cin>>X; int W[n]; for(i=0;i<n;i++) { if(a[i]==X) { W[j]=i; j++; } } for(i=0;i<j;i++) cout<<W[i]<<" ";}