Потрібно порахувати кількість яблук, які складені пірамідкою (як на малюнку). Скільки яблук на прилавку, якщо всього N рядів?

Алгоритм роботи

Ввести кількість рядів

Присвоїти змінним – кількість яблук і рядів значення = 0

Цикл for умова для змінної r кількість повторень введене значення кількості рядів

Тіло циклу – додати до попередньої змінної кількості яблук +1

Змінити змінну кількість яблук – ряди додати до кількості яблук

Вивести на екран кількість яблук

1. количество ядер процессора  2. частота процессора и частота системной шины (fsb) процессора  3. объем и количество кэш-памяти процессора (cpu)4. совпадение частоты системной шины cpu и материнской платы5. частота оперативной памяти (ram) и частота шины памяти материнской платы  6. объем оперативной памяти  7. используемый на материнской плате чипсет (intel, via, sis, nvidia, ati/amd)8. используемая графическая подсистема – встроенная в материнскую плату или дискретная  9. тип интерфейса винчестера (hdd) – параллельный ide или последовательные sata и sata-210. кэш винчестера

и это еще не все, можно продолжать. 

2^i = n

2^i = 64

i = 6 бит.

ответ. 6 бит

дело в том, что цифра это знак, и буква это знак.

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end.