Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
(неясно-пиши в личку)
текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно
30 символов = 30 байт или 30 * 8 = 240 бит
var
i: integer;
a: array[1..20] of integer;
function fn(x: integer): integer;
begin
if x mod 10 = 4 then fn: =x div 2
else fn: =x;
end;
for i: =1 to 20 do
readln(a[i]);
a[i]: =fn(a[i]);
writeln(a[i]);
end.
var x1,x2,x3,x4,x5: integer;
s: real;
read(x1,x2,x3,x4,x5);
s: = (x1+x2+x3)/(x4+x5);
if round(s)=s then writeln("celoe - "s);
Популярные вопросы