Так как число может быть большим, то для его описания применим тип longint.
При помощи процедуры Str превращаем число n в строку S, выделяем первую букву этой строки (S[1]), а затем при помощи процедуры Val переводим обратно строку в цифру:
1) 2¹⁶ б = 2³ * 2¹⁶=2¹⁹ бит / 2¹°=2⁹=512 кб
2) 2¹⁶ бит / 2³ / 2¹° = 2³=8 кб
3) 2¹³ б = 2³ * 2¹³= 2¹⁶ бит / 2¹°= 2⁶= 64 кб
4) 2¹³ бит / 2³ / 2¹°= 2°=1 кб
5) 2¹° б= 2³ * 2¹°= 2¹³ / 2¹°= 2³=8 кб
6) 2¹°б=2³ * 2¹°= 2¹³ / 2¹°= 2³=8 кб
Var x, i: integer;
a: array [0..9] of integer;
begin
for i := 0 to 9 do
begin
readln(a[i]);
if (a[i] < 0) then x := x + a[i];
end;
writeln(x);
<span>end.
Вот так это сделать можно)</span>
Мне нравится А и В
Мне ¬ нравится А ∧ В
Мне нравится А ∧ ¬ В
Мне ¬ нравится В V ¬ нравится А
Мне ¬ нравится А
Мне ¬ нравится В. ∧ нравится А
@php (логику можно интерпретировать на любой язык, просто не указано какой язык программы)
$day = 1;$start = 10;
while ($start < 18){ $start = $start + 2; $day++;}echo $day;