<span>var a,b,c,min,max:integer;
begin
readln(a,b,c);
if a<b then min:=a else min:=b;
if c<min then min:=c;
writeln(min);
if a>b then max:=a else max:=b;
if c>max then max:=c;
writeln(max);
end<span>.
Пример:
</span><span>1 2 3
1
3</span></span>
Б- прав Боря так как в первом предложении 24 буквы а каждая буква содержит 8 бит информации из этого вытекает то что 1 предложение весит 24*8=192 бита
Если дракону сто лет или меньше, то у него 3N голов.
Если ему больше ста лет, то у него 300+2(N-100) голов.
PascalABC.NET 3.4
begin
// Если a и b целые, они также включаются в подсчет
var (a,b):=ReadReal2('Введите через пробел два числа:');
if a>b then Swap(a,b); // а - левая границв
Writeln('Целых чисел в интервале: ',Trunc(b)-Trunc(a)+1);
end.
Ответ:
#include <iostream>
using namespace std;
int main()
{
int а; int b;
cout << "enter the first integer number: ";
cin >> a;
cout << "enter the second integer number: ";
cin >> b;
if(a<b || a=b) a=0;
cout << "a=" << a<< "\n"<<"b="<<b<<"\n";
system("pause");
return 0;
}