12 250 байт
Объяснение:
I = K * i, где
I - это информационный объём текста (размер файла, содержащего сообщение)
K - количество символов в тексте
i - информационный вес одного символа (число бит, используемых для записи одного символа)
N = 2^i, где
N - мощность алфавита (количество символов в алфавите)
^ - знак степени
Дано:
N = 256 символов
K = 5 страниц * 35 строк * 70 символов = 12 250 символов
Найти:
I
256 = 2^i
256 = 2⁸
i = 8 бит = 1 байт
I = 12 250 * 1 = 12 250 байт ≈ 11,963 Кбайт
1 байт = 8 бит
1 Кбайт = 1 024 байт
Решение Pascal
Delphi/Pascal
program Case5;
var
N,A,B:Integer;
begin
Write('Введите номер действия: ');
Readln(N);
Write('Введите число A: ');
Readln(A);
Write('Введите число B: ');
Readln(B);
Case N of
1: Writeln(A+B);
2: Writeln(A-B);
3: Writeln(A*B);
4: Writeln(A/B);
end;
end.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Решение C
C
#include <stdio.h>
int main(void)
{
system("chcp 1251");
int n;
float a,b;
printf("N:") ;
scanf ("%i", &n);
printf("A:") ;
scanf ("%f", &a);
printf("B:") ;
scanf ("%f", &b);
switch (n) {
case 1:
printf("%f\n",a+b) ;
break;
case 2:
printf("%f\n",a-b) ;
case 3:
printf("%f\n",a*b) ;
case 4:
printf("%f\n",a/b) ;
}
return 0;
19
20
21
22
23
24
25
26
27
28
29
30
12 250 байт
Объяснение:
I = K * i, где
I - это информационный объём текста (размер файла, содержащего сообщение)
K - количество символов в тексте
i - информационный вес одного символа (число бит, используемых для записи одного символа)
N = 2^i, где
N - мощность алфавита (количество символов в алфавите)
i - информационный вес одного символа (число бит, используемых для записи одного символа)
^ - знак степени
Дано:
N = 256 символов
K = 5 страниц * 35 строк * 70 символов = 12 250 символов
Найти:
I
256 = 2^i
256 = 2⁸
i = 8 бит = 1 байт
I = 12 250 * 1 = 12 250 байт ≈ 11,963 Кбайт
1 байт = 8 бит
1 Кбайт = 1 024 байт
Решение Pascal
Delphi/Pascal
program Case5;
var
N,A,B:Integer;
begin
Write('Введите номер действия: ');
Readln(N);
Write('Введите число A: ');
Readln(A);
Write('Введите число B: ');
Readln(B);
Case N of
1: Writeln(A+B);
2: Writeln(A-B);
3: Writeln(A*B);
4: Writeln(A/B);
end;
end.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program Case5;
var
N,A,B:Integer;
begin
Write('Введите номер действия: ');
Readln(N);
Write('Введите число A: ');
Readln(A);
Write('Введите число B: ');
Readln(B);
Case N of
1: Writeln(A+B);
2: Writeln(A-B);
3: Writeln(A*B);
4: Writeln(A/B);
end;
end.
Решение C
C
#include <stdio.h>
int main(void)
{
system("chcp 1251");
int n;
float a,b;
printf("N:") ;
scanf ("%i", &n);
printf("A:") ;
scanf ("%f", &a);
printf("B:") ;
scanf ("%f", &b);
switch (n) {
case 1:
printf("%f\n",a+b) ;
break;
case 2:
printf("%f\n",a-b) ;
break;
case 3:
printf("%f\n",a*b) ;
break;
case 4:
printf("%f\n",a/b) ;
break;
}
return 0;
}
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
#include <stdio.h>
int main(void)
{
system("chcp 1251");
int n;
float a,b;
printf("N:") ;
scanf ("%i", &n);
printf("A:") ;
scanf ("%f", &a);
printf("B:") ;
scanf ("%f", &b);
switch (n) {
case 1:
printf("%f\n",a+b) ;
break;
case 2:
printf("%f\n",a-b) ;
break;
case 3:
printf("%f\n",a*b) ;
break;
case 4:
printf("%f\n",a/b) ;
break;
}
return 0;
}
Объяснение: