Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Простейшие циклы https://www.cyberforum.ru/ pascal/ thread66809.html
Помогите пожалуйста написать программку. Дано натуральное число n. Выяснить, входит ли цифра 3 в запись числа n в квадрате
Pascal Разветвления
Даны натуральные числа x1,x2,x3,y1,y2,y3. Пинадлежит ли нчало координат треугольнику с вершинами (x1,y1)(x2у2)(х3у3)? Помогите пожалуйста...
Pascal Построить очередь из 7 символов https://www.cyberforum.ru/ pascal/ thread66797.html
Постройте очередь из 7-ти символов - ‘k’, ‘l’,‘m’, ‘n’, ‘o’, ‘p’, ‘r’. Выведите из очереди три символа ‘l’, ‘m’, ‘r’ и добавьте в конец очереди символ ‘s’. Результаты как промежуточных, так и конечных результатов отобразить на экране. И пожалуйста поставьте в программе комент де именно выводятся символы и добавляется в конец очереди символ 's' ...хочеться понять как никак))))
Pascal Матрица https://www.cyberforum.ru/ pascal/ thread66791.html
при попытки их осмысления голова пытаеться лопнуть 8) 1)Даны целые чилса a1...a10 и целочисленная квадратная матрица B(nxh) заменить нулями в матрице те элементы с чётной суммой индексов,для которых имеються равные среди a1...a10 2)дано число x напечатать в порядке возростания числа Chx 1+|x| 2*x*(1+x) немогу понять как писать
Pascal Pascal|Вывод результатов.
Здравствуйте! Меня интересует вот какой вопрос. Результат выполнения моей програмы, множество разных элементов которые я вывожу на экран. Но так как их много то соотвественно в экране они все не помещаются и я вижу лишь часть их. Есть ли возможность прокрутки окна в каком нибудь компиляторе паскаля? и как её можно установить? Например как в командной строке (пуск-выполнить-cmd)
Pascal табуляция функции Помогите написать программу... Табуляция функции Y=F(x) функция (tg^4(x)+tg^4(0.4x))/0.4x при А=0.02 n=10 h=0.01 Результатом является таблица содержащая три столюца: i - текущая точка расчета, Xi -значение аргумента, Yi - значение функции https://www.cyberforum.ru/ pascal/ thread66786.html
Pascal массив Найти, сколько элементов массива A={a} удовлетворяют условию c<=a<=d. Использовать динамическое выделение памяти. https://www.cyberforum.ru/ pascal/ thread66780.html Pascal Стек
Постройте с помощью массива стек из 6 строковых элементов. Разместите в стеке шесть элементов: ‘name’, ‘fio’, ‘ves’, ‘age’, ‘rost’, ‘dlina’. Удалите из стека два элемента ‘dlina’ и ‘fio’ и добавьте новый элемент ‘size’. Результаты как промежуточных, так и конечных результатов отобразить на экране.
Pascal Найти сумму элементов матрицы, расположенных ниже побочной диагонали 1) Вычислить и вывести в квадратной матрице порядка N: сумму элементов, расположенных ниже побочной диагонали. 2) Преобразовать квадратную матрицу порядка N, напечатавши начальную и преобразованную матрицы. Преобразования осуществить делениеи элементов каждого столбца на соответствующий элемент главной диагонали. Помогите пожалуйста решить задачи :) https://www.cyberforum.ru/ pascal/ thread66776.html Pascal Работа с массивом из записей https://www.cyberforum.ru/ pascal/ thread66767.html
1. Дан список, содержащий не менее 10 записей, каждая из которых имеет структуру: Ф.И.О. 20 символов Факультет 5 символов Группа 6 символов Год рождения целое число 2. Разработать программу, выполняющую следующие функции: - ввод данного списка в массив записей; - вывод массива записей на экран;
Pascal 1.Если в матрице А(4, 4) максимальный элемент из расположенных на
1.Если в матрице А(4, 4) максимальный элемент из расположенных на главной диагонали по модулю меньше 4.2, то все элементы матрицы умножить на 10, в противном случае элементы последних трёх строк заменить на этот максимум. 2.Даны массивы HD1, …, HD8 – шифры дорог; КАТ1, …, KAT2 – категории дорог; S1, …, S8 - протяженности в км. Вывести два списка: 1) список дорог 1-й категории...
Pascal Принадлежность точки прямоугольнику. Помогите пожалуйста решить задачу!!!:cry:даны координаты вершин двух прямоугольников, стороны которых параллельны осям координат. Даны координаты десяти точек. В какой из прямоугольников попадает больше точек. https://www.cyberforum.ru/ pascal/ thread66760.html
2923 / 844 / 324
Регистрация: 30.04.2009
Сообщений: 2,633
24.11.2009, 11:57 0

цикл For - Pascal - Ответ 374375

24.11.2009, 11:57. Показов 2135. Ответов 24
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
for s:=1 to 10000 do
begin
 z:=z-z*m/10;
 s:=s+1;
 z:=z+z+n/100;
 if (z>220) or(z<=0) then break;
end;
if z>=220 then
writeln(s)
 else writeln('Такого не произошло за 10000 сек');


Вернуться к обсуждению:
цикл For Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.11.2009, 11:57
Готовые ответы и решения:

Итерационный цикл и цикл с известным числом повторения
5.12-интерационный цикл 4.9-цикл с известным числом повторений

Цикл FOR,WHILE и Цикл DO WHILE (DENWER+PHP)
Составить алгоритм и программу для вычисления произведения чисел: 13, 14.3, 15.6, 16.9, …, 40.3...

Разработать алгоритм с применением вложенных базовых структур «цикл с предусловием» или «цикл с постусловием»
Разработать алгоритм с применением вложенных базовых структур «цикл с предусловием» или «цикл с...

Создать программу по всем 3 видам циклов...цикл с параметром,цикл с условием,цикл,и цикл с предусловием...
Найти сумму чисел 1 в квадрате до 10 c квадрате...операцию возведению в степень не использовать...

24
24.11.2009, 11:57
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.11.2009, 11:57
Помогаю со студенческими работами здесь

Написать в турбо паскале, Цикл с параметром, Цикл, с постусловием, и с предусловием пожалуйста

Цикл с предусловием преобразовать в цикл с параметром
Необходимо переделать цикл с предусловием в цикл с параметром, но я не понимаю как Задание:...

Цикл с предусловием и цикл с постусловием
Составить 3 условия программы с использованием оператора цикла с предусловием и 3 условия программы...

Цикл While переделать на цикл repeat until
как из While переделать на цикл repeat until

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru