Исправить нужно два имени:
А) "новый".txt - нельзя использовать кавычки в имени файла. Правильное имя будет
новый.txt
C) Морской мир. JPEG - в расширении имени файла не должно быть пробелов. Правильное имя будет Морской мир.JPEG
program q;
var
m:array[1..5] of integer;
sum, j:integer;
begin
sum:=0
for j=1 to 5 do
begin
write('введите ',j ,'элемент массива: ');
readln(m[j]);
sum:=sum+m[j]
end;
sum:=sum/5;
writeln(sum)
end.
MMVII=2007
CDXLVIII=448
MCMLIV=1954
MCDXXIII=1423
<span>LXXIX=79
</span>MMCXLI=2141
1) N=2^i i-бит/1 символ N - символов в алфавите
N=56 i=6 6*132 бит в сообщении
(6*132)/8=99 байт
Ответ 99 байт
2) i = (24*8)/48=4
N=2^i=2^4=16 символов в алфавите
Ответ 16 символов
3) 2^i=75
i=7
Ответ 7 лампочек
4) N=18-(-14)=32 +1=33 (включая 0)
i=6 бит/1измер
6*144=864 бит или 108 байт
var S, p, a, b: real;
begin
writeln('Введите периметр прямоугольника');
readln(p);
writeln('Введите одну из сторон прямоугольника');
readln(a);
b:=(p-2*a)/2;
s:=a*b;
writeln('Площадь прямоугольника равна ', s);
end.