|
|
| Другие темы раздела | |
| Pascal Найти сумму отрицательных элементов массива Не могу понять, что и как тут делается. Помогите, пожалуйста. Предусловия: Для получения результата разработать алгоритм и программу, содержащую функцию, исходными данными которой являются два массима X1,X2, ...,Xn и Y1, Y2, ..., Yn с заданным числом n элементов (или один из них) или матрица A из n строк и n столбцов. Задача: Сумма отрицательных элементов массива Y1, Y2, ..., Yn. https://www.cyberforum.ru/ pascal/ thread1125150.html |
Pascal Из одного массива получить другой по правилу Из массива c1,c2...c18 получить массив x1, x2...x18 по правилу; x1 =c1, x2 =c3,...,x9 =c17, x10 =c18, x11 =c16...,x18 =c2 Помогите,заранее спасибо) |
|
Pascal Файлы. Для студентов, имеющих все отличные оценки, заменить величину стипендии на повышенную и вывести по ним всю информацию, за исключением пола
https://www.cyberforum.ru/ pascal/ thread1125121.html Не могу понять, что и как делать. Подскажите, пожалуйста. Условия: Составить программу для обработки информации о некоторых объектах - студентах какого-то факультета. Каждый объект характеризуется совокупностью признаков: ФИО, Год Рождения, Пол, Оценки по Физике, Оценки по Математике, Оценки по Информатике, Стипендия. 1. Создать исходный типизированный файл. 2. результаты записать в... |
Pascal Составить программу и схема-блок для четырех точек и определить в какой четверти они находятся Задача такова - нужно составить программу и схема-блок для четырех точек и определить в какой четверти они находятся. Алгоритм чтобы был циклическим.. Оттолкнуться можно от этого кода, только помогите добавить цикличность и работали чтобы четыре точки, либо с схема-блоком, пожалуйста! program Project2; uses crt; var x,y,z,m : integer ; begin clrscr; write('Введите x : '); readln(x); https://www.cyberforum.ru/ pascal/ thread1124982.html |
|
Найти первый нулевой элемент и место где он расположен Pascal Заданы две матрицы А(6,6) и В(6,6). Для матрицы, которая отвечает заданному условию (1) выполнить преобразования (2). Условие (1) проверить в подпрограмме Function, преобразование выполнить в подпрограмме Procedure. Условия: 1 - больше сумма положительных элементов в четных строках. 2 - найти первый нулевой элемент и место где он расположен. |
Pascal Нужна книга "Задачи по программированию" под редакцией С. Окулова
https://www.cyberforum.ru/ pascal/ thread1124897.html Здравствуйте форумчане, помогите пожалуйста найти книгу "Задачи по программированию" под редакцией С. Окулова. Авторы Окулов С.М., Ашихмина Т.В., Бушмелева Н.А. Издательство: Лаборатория Базовых Знаний, Бином.Лаборатория знаний, Бином пресс (2006). ISBN 5-94774-206-3. Ссылка с полным описанием по хайдом http://bookfinder.su/o/9785947742060/function.mysql-connect |
| Pascal Сделать большими все буквы в тех словах, длина которых меньше половины длины самого длинного слова строки Здравствуйте,помогите пожалуйста решить Сделать большими все буквы в тех словах,длина которых меньше половины длины самого длинного слова строки. Огромное спасибо! https://www.cyberforum.ru/ pascal/ thread1124786.html |
Создание блок-схемы Pascal Здравствуйте,помогите пожалуйста к этой программе составить блок схему!очень благодарна буду! uses crt; const N=5; var a: array of integer; x,y,min,max,xmax,ymax: integer; begin clrscr; randomize; |
|
Pascal Ошибка при реализации стека
https://www.cyberforum.ru/ pascal/ thread1124635.html Здравствуйте! Делал модуль стека, еще неделю назад работал, вчера так и не смог найти ошибку..( unit Unit_Stack; interface type tStack = ^rStack; |
Pascal Найти произведение элементов массива с четными номерами Заполнить одномерный целочисленный массив случайными числами, найти произведение элементов массива с четными номерами. https://www.cyberforum.ru/ pascal/ thread1124632.html |
|
Получите все символы, расположенные между первым и вторым двоеточием Pascal Пусть даны целое число n, символы S1, S2,..., Sn, среди которых есть двоеточие. Получите все символы, расположенные: между первым и вторым двоеточием; если второго двоеточия нет, то получите все символы, расположенные после имеющегося двоеточия. |
Pascal Переделать в "пусть одновременно движутся две окружности" Uses graph; Var x,device,Mode:integer; Begin Device:=0 ; InitGraph(Device,Mode,'<C:\TP\BGI>'); readln; x:=40; repeat SetColor(White); Circle(x,100,10); https://www.cyberforum.ru/ pascal/ thread1124588.html |
|
Платежеспособный зверь
8926 / 4354 / 1642
Регистрация: 28.10.2009
Сообщений: 11,568
|
||||||
| 21.03.2014, 00:46 | 0 | |||||
Даны три целых числа. Найти сумму двух наибольших из них - Pascal - Ответ 592932621.03.2014, 00:46. Показов 22065. Ответов 4
Метки (Все метки)
Ответ
А так не проще:
Вернуться к обсуждению: Даны три целых числа. Найти сумму двух наибольших из них Pascal
1
|
||||||
| 21.03.2014, 00:46 | |
|
Готовые ответы и решения:
4
Даны три числа. Найти сумму двух наибольших из них
Даны три числа. Найти сумму двух наибольших из них Даны три числа. Найти сумму двух наибольших из них |
| 21.03.2014, 00:46 | |
| 21.03.2014, 00:46 | |
|
Помогаю со студенческими работами здесь
0
Даны 3 числа, найти сумму двух наибольших из них
Дано три числа. Найти сумму двух наибольших из них Три разных целых положительных числа: найти сумму двух наименьших из них |
Наверх