|
|
| Другие темы раздела | |
| Turbo Pascal Даны натуральные числа n, a0, a1, a2, ., a3n-1 Даны натуральные числа n, a0, a1, a2, ..., a3n-1. Каждая тройка чисел ai, ai+1, ai+2, где i кратно трем, задает координаты центра квадрата (ai, ai+1) и длину его стороны ai+2. Предполагается, что стороны квадратов расположены параллельно осям координат экрана. Построить и закрасить какими-либо цветами квадраты, заданные последовательностью a0, a1, a2, ..., a3n-1. https://www.cyberforum.ru/ turbo-pascal/ thread882188.html |
Turbo Pascal Массив. Сумма элементов Дана матрица А(n,n). Найти сумму элементов над (под) главной и над (под) побочной диагоналями (включительно с элементами диагоналей). |
|
Turbo Pascal Найти номер первого четного числа последовательности чисел
https://www.cyberforum.ru/ turbo-pascal/ thread882171.html решить задачу двумя способами 1. С массивом(При решении способом с массивом вывести все введенные числа в виде строки) 2. Используя метки и оператор goto (не используя никакой цикл) С клавиатуры вводится N целых чисел a1, a2,….,aN. Найти сумму этих чисел. Найти номер первого четного числа последовательности чисел. Если четных чисел нет, то результат равен нулю. Одну часть этой задачи... |
Turbo Pascal нужно написать программу генерации простых чисел 0т 1000 до 5000 используя алгоритм Эвклида вот что есть. но в програме ошибка Program prost_chisla; uses crt; const m=5000; var A:array of integer; P:array of longint; k,z,x,c,x1,x2,n,i,v,z1,st:longint; begin {writeln(' vvenite n ot 1000 do 5000'); readln(n);} https://www.cyberforum.ru/ turbo-pascal/ thread882158.html |
|
записи, паскаль Turbo Pascal опишите, используя структуру записи, таблицу сведений о студентах(ф.и.о., курс, группа, номер зачетки, средний бал). Составить программу, организующую ввод с клавиатуры и вывод на экран таблицу сведений о студентах, а затем выдающих список студентов, обучающихся в группе, номер которого введен с клавиатуры. |
Turbo Pascal Найдите ошибку в задаче program Trapezia; uses crt,graph; const points:array of string=('O_programe','Vvod_dannbix','graphicheskaa_chast','exit'); var a:char; c,cc:word; {-----------------------------------------------------} procedure aktmenu(N:word); var i,c:word; Begin clrscr; https://www.cyberforum.ru/ turbo-pascal/ thread882136.html |
|
Turbo Pascal Вывести четные числа среди положительных элементов
https://www.cyberforum.ru/ turbo-pascal/ thread882133.html Вывести четные числа среди положительных элементов |
Turbo Pascal Одномерный массив Поменять местами максимальный элемент одномерного массива и его соседа слева. |
| Turbo Pascal В матрице А (2,3) элементы первого столбца умножить на 15 Глубоко извиняюсь но нужна помощь. Не знаю как написать эту задачу на Pascal:-| : "В матрице А (2,3) элементы первого столбца умножить на 15 и отнять от каждого соответствующий элемент третьего столбца, если А (1,1)<15, в противном случае найти сумму элементов третьего столбца." https://www.cyberforum.ru/ turbo-pascal/ thread882124.html | Turbo Pascal Упорядочить данные в порядке возрастания возрастов сотрудников Помогите, пожалуйста, составить программу или подскажите как правильно сделать!!!!! По данным таблицы, содержащей информацию о работниках предприятия, упорядочить данные в порядке возрастания возрастов сотрудников. Вывести на печать исходную таблицу и упорядоченную таблицу. Таблица в файле. Огромное, СПАСИБО!!!!! https://www.cyberforum.ru/ turbo-pascal/ thread882112.html |
|
Turbo Pascal описать каждую строчку кода Помогите пжлс-та!!!Заранее пасиба всем кто откликнулся! program mmm1; uses crt; type mas=array of real; var a,b:mas; i,n,m,j:integer; max:real; procedure vv(x:mas;y:integer); begin for i:=1 to y do |
Turbo Pascal Из одной матрицы составить другую (ошибку 207)
https://www.cyberforum.ru/ turbo-pascal/ thread882083.html uses crt; type matrix1=array of real; matrix2=array of real; var i,j,n,m,k:integer; h1,h2,a,b,c,d,max:real; x,y,xx:matrix1; aa,bb:matrix2; begin clrscr; write('enter integer(1<n<15)n='); readln(n); |
|
0 / 0 / 0
Регистрация: 25.10.2013
Сообщений: 16
|
|
| 10.04.2014, 12:34 | 0 |
Если все элементы главной диагонали целочисленной матрицы упорядочены по убыванию, заменить нулями все отрицательные элементы матрицы - Turbo Pascal - Ответ 602556110.04.2014, 12:34. Показов 3510. Ответов 1
Метки (Все метки)
Ответ
знает кто как это написать
Вернуться к обсуждению: Если все элементы главной диагонали целочисленной матрицы упорядочены по убыванию, заменить нулями все отрицательные элементы матрицы Turbo Pascal
0
|
|
| 10.04.2014, 12:34 | |
|
Готовые ответы и решения:
1
Если все отрицательные элементы матрицы расположены на главной диагонали, то упорядочить элементы каждой строки методом просеивания
|
| 10.04.2014, 12:34 | |
| 10.04.2014, 12:34 | |
|
Помогаю со студенческими работами здесь
0
Заменить на главной диагонали матрицы все отрицательные элементы их абсолютными значениями
|