|
|
| Другие темы раздела | |
| Turbo Pascal Найти самое длинное слово среди слов, вторая буква которых есть e Даны натуральное число n, символы s1,...,sn. Группы символов, разделенные пробелами (одним или несколькими) и не содержащие пробелов внутри себя будем называть словами Дан символьный файл f. Найти самое длинное слово (см. предыдущую задачу) среди слов, вторая буква которых есть e; если слов с наибольшей длинной несколько, то найти последнее. Если таких слов нет нет вообще, то сообщить об этом.... https://www.cyberforum.ru/ turbo-pascal/ thread662046.html |
Turbo Pascal Определить номер самого дорого товара, который намерен приобрести покупатель, имеющий заданную сумму денег Имеются данные о ценах на десять видов товаров. Определить номер самого дорого товара, который намерен приобрести покупатель, имеющий заданную сумму денег. Помогите, пожалуйста, решить Заранее спасибо!) |
|
Turbo Pascal Графика: движение вверх по бесконечной лестнице
https://www.cyberforum.ru/ turbo-pascal/ thread662001.html Изобразите движение вверх по бесконечной лестнице. Как это реализовать в паскале? используя циклы? |
Turbo Pascal Файл записей: Найти количество кубиков каждого цвета и их суммарный объем Дан файл f, содержащий сведения о кубиках: размер каждого кубика (длина ребра в сантиметрах), его цвет (красный, желтый, зеленый или синий) и материал (деревянный, металлический, картонный). Найти: Количество кубиков каждого из перечисленных цветов и их суммарный объем. файл f нужно заполнять через процедуру этой программы, результат выводить через процедуру в файл g В заранее благодарю! https://www.cyberforum.ru/ turbo-pascal/ thread661988.html |
|
Turbo Pascal В массиве заменить максимальный элемент нулем 1.В массиве { x1, x2 ,..., xn} заменить максимальный элемент нулем. |
Turbo Pascal С клавиатуры вводить символы, пока не будет введен символ «z» или «Z»
https://www.cyberforum.ru/ turbo-pascal/ thread661913.html может еще поможете девушке? 3)С клавиатуры вводить символы, пока не будет введен символ «z» или «Z» Заранее спасибо |
| Turbo Pascal Списки: Выяснить, имеются ли среди чисел a1, ., an совпадающие Даны натуральное число n, целые числа a1, ..., an. Выяснить имеются ли среди чисел a1, ..., an совпадающие. и мне посоветовали использовать вот эти строки Res := False; N1 := 1; repeat for N2 := N1 + 1 to N do Res := A = A; Inc(N1); until Res or N1 = N; https://www.cyberforum.ru/ turbo-pascal/ thread661900.html |
Вычислить и вывести на экран в виде таблицы значения функции Turbo Pascal С использованием оператора repeat until вычислить и вывести на экран в виде таблицы (таблицу снабдить заголовком и шапкой) значения функции F на интервале от Xнач. до Xкон. с шагом dX. f={a-x/(10+b) при x<0 и b неравно 0 f={(x-a)/(x-c) при x>0 и b=0 f={3x+2/c в остальных случаях, где a, b, c действительные числа. Значения a, b, c, Xнач., Xкон., dX. Ввести... |
| Turbo Pascal Найдите сумму н-членов ряда Фибоначчи Найдите сумму n-членов ряда Фибоначчи , используя также только две переменные для нахождения членов ряда и суммы. https://www.cyberforum.ru/ turbo-pascal/ thread661760.html | Turbo Pascal Через сколько секунд часовая и минутная стрелки совместятся Время, которое показывают часы задано в часах, минутах и секундах. Определите, через сколько секунд часовая и минутная стрелки совместятся. https://www.cyberforum.ru/ turbo-pascal/ thread661744.html |
|
Turbo Pascal Нужно изменить переменную а на f и что бы ее значение задавалось мной. Нужно изменить переменную а на f и что бы ее значение задавалось мной. program p99; var a,b,c,t,q:real; procedure Lac (r:real; var l,s:real); const Pi=3.14159; begin l:=2*Pi*r; s:=Pi*sqr(r); end; |
Turbo Pascal С клавиатуры вводятся 2 числа, выяснить является ли их разность положительным числом
https://www.cyberforum.ru/ turbo-pascal/ thread661619.html С клавиатуры вводятся 2 числа, выяснить является ли их разность положительным числом |
|
Фрилансер
|
||||||
| 02.10.2012, 14:47 | 0 | |||||
Вывести таблицу квадратов первых пяти положительных нечетных чисел - Turbo Pascal - Ответ 351160702.10.2012, 14:47. Показов 12010. Ответов 2
Метки (Все метки)
 Сообщение было отмечено MaPk0 как решение
Решение
Вернуться к обсуждению: Вывести таблицу квадратов первых пяти положительных нечетных чисел Turbo Pascal
2
|
||||||
| 02.10.2012, 14:47 | |
|
Готовые ответы и решения:
2
Цикл с постусловием. Вывести таблицу квадратов первых пяти целых положительных нечетных чисел
|
| 02.10.2012, 14:47 | |
| 02.10.2012, 14:47 | |
|
Помогаю со студенческими работами здесь
0
Вывести таблицу квадратов первых ста натуральных чисел |