1. Информационный объём сообщения составляет 128 Кбайт. Оно состоит из 64 страниц, на каждой странице записано по 16 строки по 36 символа в каждой. Какова мощность алфавита, с которого записано это сообщение? Дано: Формулы: Решение:
1) Выводит 2 2) var N: longint; digit, maxdigit: integer;
begin readln(N); maxdigit := 10; // нужно присваивать 0 while N > 10 do // нужно написать N > 0 begin digit := N mod 10; if digit > maxdigit then maxdigit := digit; N := N div 10; end; writeln(digit); // нужно вывести maxdigit end.
Верный код
var N: longint; digit, maxdigit: integer;
begin readln(N); maxdigit := 0; while N > 0 do begin digit := N mod 10; if digit > maxdigit then maxdigit := digit; N := N div 10; end; writeln(maxdigit); end.
ответ:1) (1 б.) Верные ответы: 3;
2) (1 б.) Верные ответы: 4;
3) (1 б.) Верные ответы: 1; 2;
4) (1 б.) Верные ответы: 3;
5) (1 б.) Верные ответы: 1;
6) (1 б.) Верные ответы: 3;
7) (1 б.) Верные ответы: 4;
8) (1 б.) Верные ответы: 1;
9) (1 б.) Верные ответы: 3;
10) (1 б.) Верные ответы: 3;
11) (1 б.) Верные ответы: 2;
12) (1 б.) Верные ответы: 3;
13) (1 б.) Верные ответы: 4;
14) (1 б.) Верные ответы: 1;
15) (1 б.) Верные ответы: 1; 2;
16) (1 б.) Верные ответы: 1;
17) (1 б.) Верные ответы: 2;
18) (1 б.) Верные ответы: 1;
19) (1 б.) Верные ответы: 3;
20) (1 б.) Верные ответы: 2;
21) (1 б.) Верные ответы: 2;
Объяснение: