Слово в памяти компьютера выглядит следующим образом: 01001101 01000001 01010000 С таблицы ASCII определи, что это за слово. MAD girl dog MAP

DAG

Объяснение:

Program zadacha;
uses crt;
var a, i: integer;
z: real;
h: array [1..5] of integer;
begin
clrscr;
write ('vvedite chislo A: ');
readln (a);
for i:=1 to 5 do begin
write ('vvedite elemeny massiva H: ');
readln (h[i]);
z:=sqrt(h[i]/a);
writeln ('H[i]=',h[i], ' Z=', z:0:4);
end;
readkey;
end.

или 

program zadacha;
uses crt;
var a, i: integer;
z: real;
h: array [1..5] of integer;
begin
clrscr;
write ('vvedite chislo A: ');
readln (a);
for i:=1 to 5 do begin
write ('vvedite elemeny massiva H: ');
readln (h[i]);
end;
for i:=1 to 5 do begin
z:=sqrt(h[i]/a);
writeln ('H[', i, ']=',h[i], ' Z=', z:0:4);
end;
readkey;
end.

Case N:=1 fo 12   {тут N это цифра месяца }
1: writeln(' зима')        {тут выводится название времени года}
2: writeln('зима')        {тут выводится название времени года}
3: writeln('весна')        {тут выводится название времени года}
4: writeln('весна')        {тут выводится название времени года}
5: writeln('весна')        {тут выводится название времени года}
6: writeln('лето')        {тут выводится название времени года}
7: writeln('лето')        {тут выводится название времени года}
8: writeln('лето')        {тут выводится название времени года}
9: writeln('осень')        {тут выводится название времени года}
10: writeln('осень')        {тут выводится название времени года}
11: writeln('осень')        {тут выводится название времени года}
12: writeln('зима')        {тут выводится название времени года}