Для повторений берётся цикл. например в паскале for i: =1 to 5 do действие;
nrostovtseva142
03.03.2021
Замечание: данные в файле должны быть записаны по одному числу в строке. const m=100; { максимальное количество чисел в файле } var f: text; i,j,n,k: integer; a: array[1..m] of integer; begin { читаем данные из файла в массив } assign(f,'superfile.txt'); reset(f); i: =0; while not eof(f) do begin inc(i); readln(f,a[i]) end; close(f); n: =i; { сортируем массив по возрастанию методом пузырька } for i : = 1 to n-1 do for j : = 1 to n-i do if a[j] > a[j+1] then begin k : = a[j]; a[j] : = a[j+1]; a[j+1] : = k end; { заполняем файл из массива } rewrite(f); for i: =1 to n do writeln(f,a[i],' '); close(f) end.
misspodvigina
03.03.2021
Pascal: var ar: array[1..13] of integer; a: integer; begin ar[1]: =0; ar[2]: =1; ar[3]: =1; for a: =4 to 13 do ar[a]: =ar[a-1]+ar[a-2]; for a: =1 to 13 do write(ar[a],','); readln; end. c++: #include < iostream> #include < cstdlib> // для system using namespace std ; int main (){ int ar[12]; ar[1]=0; ar[2]=1; ar[3]=1; for (int a=4; a< 11; a++) { ar[a]=ar[a-1]+ar[a-2]; } for (int b; b< 11; b++) { cout < < ar[b] < < ","; } system( "pause"); }
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Составить алгоритм что бы действие повторялось 5 раз