Можно попробовать через оператор выбора case (условие со многими выходами) если только такой оператор есть в турбо. в обычном паскале есть.
Например:
writeln(‘Введите цифру ‘);
readln(a);
case a of
0 : writeln (‘ноль‘);
1 : writeln (‘один‘);
2 : writeln (‘два‘);
3 : writeln (‘три‘);
4 : writeln (‘четыре‘);
5 : writeln (‘пять‘);
6 : writeln (‘шесть‘);
7 : writeln (‘семь‘);
8 : writeln (‘восемь‘);
<span> 9 : writeln (‘девять‘);
</span>
<span>Программа считает сумму последних трех цифр:
<em><u>Pascal:</u></em>
var n:longint;
sum,i:integer;
begin
repeat
write ('N = ');
readln (n):
until (n>=10000) and (n<=99999);
sum:=0;
for i:=1 to 3 do
begin
sum:=sum+(n mod 10);
n:=n div 10;
end;
writeln ('Summa: ',sum);
end.
<u><em>C++:</em></u>
#include <iostream></span>
<span>using namespace std;</span><span>
int main()</span><span>
{
</span><span>
int n,sum = 0;</span><span>
do</span><span>
{
</span><span>
cout <<"N = ";</span><span>
cin >>n;
}
</span><span>
while (n<10000 || n>99999);</span><span>
for (int I = 1; I<=3; I++)</span><span>
{
sum+=n%10;
n/=10;
}
</span><span> cout <<"Summa: " <<sum <<endl;</span><span>
return 0;</span><span>
}</span>
Hgjhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj
Не совсем точно описал. если рандомом, то:
с++
#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;
}
Один символ кодируетсяя 1 байтом
на одной странице 30*70=2100 символов
84000:(2100*8)=5