Ответ: сообщение состоит из 20 символов, то есть из 20 байтов, потому что 1 символ - 8 бит,а 8 бит-1 байт.
Если нужно вывести большее из двух чисел, то правильно, кроме:
3-я строка - в конце нужна точка с запятой
7-я строка - бессмысленная команда readln. Ее можно не писать.
2140 гб будет в мб 2140000
var i, sum:integer;
n:string;
begin
readln(n);
for i:=1 to length(n) do begin
if StrToInt(n[i]) mod 4 <> 0 then
sum:=sum+StrToInt(n[i]);
end;
writeln(sum);
end.
3
4
5
6
7
8
9
10
11
12
13
14
15
16
<span>using</span><span>System</span><span>;</span>
<span>class</span> Summa <span>{</span><span>static</span><span>void</span> Main<span>(</span><span>)</span><span>{</span><span>int</span> n <span>=</span> Convert<span>.</span><span>ToInt32</span><span>(</span>Console<span>.</span><span>ReadLine</span><span>(</span><span>)</span><span>)</span><span>;</span><span>int</span> i<span>;</span><span>int</span> sum <span>=</span><span>0</span><span>;</span><span>for</span><span>(</span>i<span>=</span><span>1</span><span>;</span> i <span><=</span>n<span>;</span> i<span>++</span><span>)</span><span>{</span>
sum <span>=</span> i<span>+</span>i<span>;</span><span>}</span>
Console<span>.</span><span>WriteLine</span><span>(</span>sum<span>)</span><span>;</span><span>}
</span>
