program While2;
uses PT4;
function Iter(a, b: real): integer;
begin
Result := 0;
repeat
Result += 1;
a -= b
until a < b
end;
begin
Task('While2');
var (A, B) := ReadReal2();
Write(Iter(A, B))
end.
.к. каждый символ может иметь 64 значения, то есть <span> , то на каждый символ выделяется 6 бит(от 0 до 63, всего 64 варианта).Всего символов - 100. Значит всего нужно 6*100=600бит=75байт</span>
#include <stdio.h>
#include <string.h>
<span>main ( ) {
</span>
char stroka [100] ;
long int n ;
printf ("vvedi chislo n=" ) ;
scanf ( "%ld" , &n ) ;
sprintf ( stroka , "%ld" , n ) ;
printf ("dlina stroki=%d\n" , strlen ( stroka ) ) ;
printf ( "%s\n" , stroka ) ;
}