Program lab10; var n: integer; begin n: =0; repeat n: =n+1; until n*n+1> =1000; writeln(‘значение n равно‘, n: 1); end. не нравится знак в предпоследней строчке. program class; type mas=array[1..15] of integer; var a: mas; var i, s, k: integer; begin for i: =1 to 15 do переменная a переменная a[1] переменная a[4] readln(a[i]); {заполняем массив} k: =0; s: =0; for i: =1 to 15 do begin s: =s+ a[i]; if a[i]> 10 then k: =k+1; end; writeln(k); writeln(s); readln; end. program sort; type mas=array[1..10] of integer; var a: mas; i, n, s, b: integer; begin for i: =1 to 10 do readln(a[i]); {заполнение массива} n: =10; {номер последнего элемента, участвующего в сравнении} s: =0; {перестановок не было} repeat for i: =1 to n do if a[i] begin s: =1; b: =a[i]; a[i]: =a[i+1]; a[i+1]: =b end; {меняем местами соседние элементы} n: =n-1 until s=0; for i: =1 to 10 do write(a[i]); везде выдает ошибку, хотя это пример к
Ответы
Язык c++ #include < iostream> using namespace std; int main() { int n,b=0; cin > > n; int a[n]; // n - кол-во элементов в массиве for(int i = 0; i < n; i++) { cin > > a[i]; } for(int i = 0; i < n; i++) { if(a[i]< 0) { b=a[i]+b; } } cout < < b < < endl; return 0; }
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Перевод из двоичной системы счисления в десятичную
Автор: diana8
Напишите программу которая 10 раз выводит на экран ваши имя и фамилию
Автор: ПетровичЖивотовская1245
Какие команды контекстного меню применяется чаще?
Автор: Попова1271
Чему равен 120/8 в двоичной системе
Автор: vedaikin
Написать программу на фортране определить, является ли заданная матрица 5 порядка ортонормированной.
Автор: Мусаев Игоревич371
ответ:
315
объяснение:
k=1 j=1: m=1-> 1 s=0+(1+1+1)=3
k=2 j=1: m=1-> 1 s=3+(2+1+1)=7
j=2: m=1-> 2 s=7+(2+2+1)+ (2+2+2)=18
k=3 j=1: m=1-> 1 s=18+(3+1+1)=23
j=2: m=1-> 2 s=23+(3+2+1)+ (3+2+2)=36
j=3: m=1-> 3 s=36+(3+3+1)+(3+3+2)+(3+3+3)=60
k=4 j=1: m=1-> 1 s=60+(4+1+1)=66
j=2: m=1-> 2 s=66+(4+2+1)+(4+2+2)=81
j=3: m=1-> 3 s=81+(4+3+1)+ (4+3+2)+(4+3+3)=108
j=4: m=1-> 4 s=108+(4+4+1)+(4+4+2)+(4+4+3)+(4+4+4)=150
k=5 j=1: m=1-> 1 s=150+(5+1+1)=157
j=2: m=1-> 2 s=157+(5+2+1)+(5+2+2)=174
j=3: m=1-> 3 s=174+(5+3+1)+(5+3+2)+(5+3+3)=204
j=4: m=1-> 4 s=204+(5+4+1)+(5+4+2)+(5+4+3)+(5+4+4)=250
j=5: m=1-> 5 s=250+(5+5+1)+(5+5+2)+(5+5+3)+(5+5+4)+(5+5+5)=315