Текст занимает 3 страницы по 25 строк. в каждой строке записано по 60 символов. сколько символов в используемом алфавите, если все сообщение содержит 1125 байт?
Надо посчитать кол-во символов в сообщении: 3*25*60=4500 сообщение занимает 1125 Байт, один символ занимает: 1125/4500=0.25 8/2=4 (Может быть до 4 символов)
Ты понимаешь, что для начала стоит сказать , что в паскале несколько видов повторения бывает. В звисимости от видов и разные механизмы. Например цикл пока или цикл с предусловием он называется: while <условие> do begin <тело цикла> end; до тех пора выполныется условие выполняем цикл.
Цикл с постусловием: repeat <тело цикла> until <условие выхода> повторять какие то действия до тех пор пока не это число указанно например не попадет в условие выхода
var a: array[1..100] of real; i, n: integer; min: real;
begin {ввод массива} if handsfree then n := random(20) + 5 else begin write('n = '); readln(n); end;
writeln('Данные массива:'); for i := 1 to n do begin if handsfree then begin a[i] := random(100); write(a[i], ' '); end else readln(a[i]); end; writeln();
{минимум и максимум} min := a[1]; for i := 1 to n do begin if (min > a[i]) and (i mod 2=1) then min := a[i]; end; writeln('min = ', min); end.
Надо посчитать кол-во символов в сообщении: 3*25*60=4500
сообщение занимает 1125 Байт, один символ занимает: 1125/4500=0.25
8/2=4 (Может быть до 4 символов)