Смассивами, 4. требуется поменять местами значения элементов массива x[a] и x[b]. какой оператор нужно добавить вместо многоточия? в ответе не используйте пробелы.p = x[a]; x[b] = p; 5. задан массив x[n]. какой оператор надо поставить вместо многоточия, чтобы в результате в переменную nr был записан номер элемента, равного r? вводите ответ без пробелов.nr = -1; for ( k=0; k if ( x[k] == r ) {break; }6. задан массив x[n]. что нужно поставить вместо многоточия, чтобы в результате элементы в массиве x были переставлены в обратном порядке? вводите ответ без пробелов.for ( k=0; k< ; k++ ) {c = x[k]; x[k] = x[n-1-k]; x[n-1-k] = c; }7. задан массив x[n]. какой оператор нужно поставить вместо многоточия, чтобы в результате элементы в массиве x были сдвинуты на один вправо (циклически)? в ответе не используйте пробелы.c = x[n-1]; for ( k=n-1; k> 0; k-- ) {}x[0] = c; 8. требуется выделить все отрицательные элементы массива a[n] в начало массива b[n]. какой оператор надо вставить в программу вместо многоточия? вводите ответ без пробелов.c = 0; for ( k=0; k if ( a[k] < 0 ) {c++; }
Ответы
1. a; c 2. write(); пример: write(c) /поясняю: ln добавляется для перехода на следующую строку при выводе/ 3. ошибка - в строке " writeln(введите значения переменных m и n); " не указана переменная k. так же не нужны кавычки в выводе, а при вводе необходимы.исправление: program prim_a; var m, n, k: integer; begin writeln('введите значения переменных m, n и k'); read(m,n, k); writeln((m+n+k)*5); end.4. a) program plowad; var a, h: real; begin writeln('введите основание треугольника и высоту'); readln(a, h); writeln('площадь треугольника равна ', a*h/2); end. 5. program proizvedenie; var a, b: integer; begin writeln('введите двузначное число'); readln(a); b: =a mod 10; a: =a div 10; writeln('произведение цифр двузначного числа равно ', a*b); end.
1) a) не может, потому что переменные должны всегда начинаться с буквы b) может c) не может, слова могут быть разделены только знаком "_",не пробелом! d) может 2) присваивание, обозначается знаком "=" например: sum = 0; 3) 4 строка - не red, а read пропущена трока между 2 и 3 строчкой - это begin 4) var s, p, a, b: integer begin write('введите сторону а: '); readln(a); write('введите сторону b: '); readln(b); s = a * b; {нахидим площадь} p = (a + b) * 2; {находим периметр} writeln('площадь = ', s, ', периметр = ', p); end. 5) var number, {трехзначное число} num1, {первая крайняя цифра} num2, {вотрая крайняя цифра} : integer; begin write('введите число'); readln(number); num1 = number mod 10; num2 = number div 100; writeln('сумма крайних цифр числа ', number, ' = ', num1 + num2); end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Определите значения переменных х и у после выполне-ния фрагмента алгоритма.
Автор: waspmoto6188
Как найти сумму чисел кратных 7 от 1 до n включительно
Автор: sargisyan
Составьте программу выделения цифр из трехзначного числа. в паскале.
Автор: PushkinaKurnosov984
Ребят не втыкаю что тут, да и какИНФОРМАТИКА, 7 КЛАСС
Автор: sport2293032