Добавлять новые элементы поверх старых. Как бы наносить новые слои на старые.
Var f,n:integer;
begin
write('Сколько дней: ');
readln(f);
n:=f div 7;
writeln('Полных недель: ',n);
<span>end.</span>
Не совсем точно описал. если рандомом, то:
с++
#include<iostream.h>
int main(int argc, char* argv[])
{ setconsolecp(1251);
setconsoleoutputcp(1251);
float a,b,c;
cout<<"\nвведите 3 числа"<<endl;
cout<<'\na="; cin>>a>>endl;
cout<<"\nb="; cin>>b>>endl;
cout<<"\nc"; cin>>c>>endl;
<span>cout << </span>"RAND_MAX = " <span><< RAND_MAX << endl; </span> <span>cout << </span>"random number = " <span><< </span>rand() << endl;
cin>>rand()>>(a,b,c)>>endl;
system (pause);
return 0;
}
In.txt и out.txt соотвественно
P.S. in.txt должен быть в Unicode