Самый первый инструмент храниния информацией ?

Память - это и есть самый первый   инструмент хранения информации

#include "stdafx.h"#include < iostream> #include < string> using namespace std; int main(void){ setlocale(lc_all, "russian"); double a, b; // тип double потому что при делении целых бывает ошибка cout < < "введите числа: \n"; while (cin > > a > > b) {  cout < < "выберите действие /, *, + или -: \n"; char act; // действие cin > > act; switch (act) { case '+': cout < < "результат: " < < a < < " + " < < b < < " = " < < a + b < < endl; break; case '-': cout < < "результат: " < < a < < " - " < < b < < " = " < < a - b < < endl; break; case '*': cout < < "результат: " < < a < < " * " < < b < < " = " < < a * b < < endl; break; case '/': cout < < "результат: " < < a < < " / " < < b < < " = " < < a / b < < endl; break; default: cout < < "ошибочка. выберите одно из действий +, -, * или /.  \n"; break; } } system("pause"); return 0; }

Var   a: array[0..9] of integer; { число повторений }   i,n,d,p: integer; begin   write('n = '); read(n);   for i: =0 to 9 do a[i]: =0; { обнулить счетчики }   p: =1;   for i: =2 to n do p: =p*i;   writeln(n,'! = ',p);   while p> 0 do begin       d: =p mod 10;       a[d]: =a[d]+1;       p: =p div 10       end;   writeln('количество повторений цифр в числе: ');   for i: =0 to 9 do       if a[i]> 0 then write(i,'-',a[i],' ');   writeln end. пример n = 9 9! = 362880 количество повторений цифр в числе: 0-1 2-1 3-1 6-1 8-2 второй вариант // pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   var p: =2.to(n).aggregate(1,(a,b)-> a*b); // факториал   writeln(n,'! = ',p);   writeln('количество повторений цифр в числе: ');   foreach var i in       p.tostring.groupby(t-> t).select(t-> (t.key,t.(t-> t[0]) do       write(i[0],'-',i[1],' ');   writeln end.