<em>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadInteger('a=');
Writeln(1.To(a).Aggregate(int64(1),(p,q)->p*q))
end.
<u>Пример</u>
a= 20
2432902008176640000
Создать проект -> Пустой проект C++ -> Исходные файлы правой кнопкой мыши и "Добавить новый" -> называют обычно main.cpp
В этом файле код:
#include <iostream>
using namespace std;
int main(int argc, char* argv[]) {
char *vers = "5.4 Alpha";
char *str;
cout << "[email protected]: ";
cin >> str;
if (str == "version") cout << "Version now: " << vers << endl;
system("PAUSE");
return 0;
}
2)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
1 символ = 1 байт = 8 бит
100*40*60 = 240000 байт = 1920000 бит
1. Клавиатура
2. Процессор
3. Монитор
4. Память
5. Мышь
6. Джойстик
7. Винчестер
8. Принтер
Слово: Компьютер