1в одной из кодировок unicode каждый символ кодируется 16 битами. определите размер следующего предложения - id950998020200714 от yanashabanova1 14.07.2020 13:09

Question

Информатика: 1в одной из кодировок unicode каждый символ кодируется 16 битами. определите размер следующего предложения в данной кодировке. я к вам пишу — чего же боле? что я могу ещё сказать? 1) 52 байт 2) 832 бит 3) 416 байт 4) 104 бит 2 рассказ, набранный на компьютере, содержит 8 страниц, на каждой стра- нице 40 строк, в каждой строке 48 символов. определите информационный объём рассказа в кбайтах в кодировке windows, в которой каждый символ кодируется 8 битами. 3 статья, набранная на компьютере, содержит

yanashabanova1 · Accepted Answer

Procedure TForm1.Button1Click(Sender: TObject);
var
i1,i2,i3 : Integer;
kk : Integer;
Chislo : Integer;
begin
Memo1.Clear;
kk := 0;
for i1 := 1 to 9 do
for i2 := 0 to 9 do
for i3 := 0 to 9 do
if ( (i1<>i2) and (i1<>i3) and (i2<>i3) ) then
if ( Frac((i1+i2+i3)/7)=0 ) then
begin
Chislo := i1*100 + i2*10 + i3;
if ( Frac(Chislo/7)=0 ) then
begin
Memo1.Lines.Append(inttostr(Chislo));
inc(kk);
end;
end;
end;

Написать программу на языке паскаль нахождения всех трехзначных чисел, у которых все цифры различны,

Написать программу на языке паскаль нахождения всех трехзначных чисел, у которых все цифры различны,

MOGZ ответил