Код ужасно кривой, но рабочий (надеюсь, принцип понятен):
1. Бензин
type
Benzin=class
public
money:double;
m:integer;
end;
var
b:Benzin;
begin
b:=new Benzin;
b.m:=0;
b.money:=20;
while b.money<22.0 do
begin
b.money:=b.money*1.02;
b.m:=b.m+1;
writeln('Сейчас бензин стоит: ',b.money);
writeln('Сейчас месяц прошел: ',b.m);
end;
end.
2. Вклад
type
biznes=class
public
money:double;
m:integer;
time:integer;
end;
var
b:biznes;
begin
b:=new biznes;
writeln('Напишите сумму рублей: ');
read(b.money);
writeln('Напишите кол-во месяцев: ');
read(b.m);
b.time:=0;
while b.time<b.m do
begin
b.money:=b.money*1.03;
b.time:=b.time+1;
writeln('Сейчас сумма: ',b.money);
writeln('Прошел месяц: ',b.time);
end;
end.
3. Тренировки
type
sport=class
public
first:double;
day:integer;
first2:double;
first3:double;
first4:double;
first5:double;
first6:double;
first7:double;
answer:double;
end;
var
s:sport;
begin
s:=new sport;
s.first:=5;
s.day:=1;
while s.day=1 do
begin
s.first2:=s.first*1.20;
s.day:=s.day+1;
writeln('Сейчас бегает: ',s.first2);
writeln('День: ',s.day);
end;
while s.day=2 do
begin
s.first3:=s.first2*1.20;
s.day:=s.day+1;
writeln('Сейчас бегает: ',s.first3);
writeln('День: ',s.day);
end;
while s.day=3 do
begin
s.first4:=s.first3*1.20;
s.day:=s.day+1;
writeln('Сейчас бегает: ',s.first4);
writeln('День: ',s.day);
end;
while s.day=4 do
begin
s.first5:=s.first4*1.20;
s.day:=s.day+1;
writeln('Сейчас бегает: ',s.first5);
writeln('День: ',s.day);
end;
while s.day=5 do
begin
s.first6:=s.first5*1.20;
s.day:=s.day+1;
writeln('Сейчас бегает: ',s.first6);
writeln('День: ',s.day);
end;
while s.day=6 do
begin
s.first7:=s.first6*1.20;
s.day:=s.day+1;
writeln('Сейчас бегает: ',s.first7);
writeln('День: ',s.day);
end;
while s.day=7 do
begin
s.answer:=s.first+s.first2+s.first3+s.first4+s.first5+s.first6+s.first7;
s.day:=s.day+1;
writeln('Ответ: ',s.answer);
end;
end.
1.9*1024*1024*8=15938355.2 бит
#include <iostream>
<span>#include <iomanip>
</span><span>using namespace std;
</span>// перевод из основания frm в основание 10
<span>void snd(int frm,int* n,char s[]) {
</span><span> int m,p;
</span><span> m=strlen(s);
</span><span> if (m>0) {
</span><span> if (s[m-1]<58) p=s[m-1]-48;
</span><span> else p=s[m-1]-'a'+10;
</span><span> s[m-1]=0; snd(frm,n,s);
</span><span> }
</span><span> else p=0;
</span><span> *n=*n*frm+p;
</span><span>}
</span>// перевод числа n из основания 10 в to
<span>void dsn(int* n,int to,char s[]) {
</span><span> static int k=0;
</span><span> int m;
</span><span> m=*n%to; *n/=to; k++;
</span><span> if (*n>0) dsn(n,to,s);
</span><span> else { s[k]=0; k=0; }
</span><span> if (m<10) s[k]=m+48;
</span><span> else s[k]=m+'a'-10;
</span><span> k++;
</span><span>}
</span><span>int main() {
</span><span> </span><span>
</span> int osns,osnd;
<span> int n=0;
</span><span> char s[30];
</span><span> cout<<"from osn: "; cin>>osns;
</span><span> cout<<"number: "; cin>>s;
</span><span> cout<<"to osn: "; cin>>osnd;
</span><span> snd(osns,&n,s);
</span><span> dsn(&n,osnd,s);
</span><span> cout<<s<<endl;
</span><span> system("pause");
</span><span> return 0;
</span><span>}
from osn: 5
number: 13211
to osn: 16
420
from osn: 16
number: 2f3de
no osn: 6
4051502
</span>
Photomath вот это приложение
A.колонка.
Б.сервер.
В.монитор.
Г.сканер.
Лишное слово сервер.
Все остальное - устройства компьютера.А сервер -компьютер.
