|
|
| Другие темы раздела | |
|
Pascal Дано натуральное n. Вычислить:
https://www.cyberforum.ru/ pascal/ thread1105447.html Дано натуральное n. Вычислить: 1/22 + 1/42 + ... + 1/(2n) n . С помощью цикла For я решила а вот с помощью While to, repit что то не могу понять как... я бы поучила все и сделала сама но времени катострофически не хватает... помогите пожалуйста, заранее большое спасибо! program zx; var n,i:integer; s:real; begin Write('n= '); ReadLn(n); s:=0; |
Составить программу для вывода на экран лучшего результата после выступления фигуристов Pascal Условие: на соревнованиях по фигурному катанию оценки заносятся в компьютер. Составить программу для вывода на экран лучшего результата после каждого выступления фигуристов. Нужно составить 3 программы с помощью циклов: while to, for, repit. Не могу понять как вывести максимальное значение, и поэтому обращаюсь за помощью... задачи нужно решить срочно ... а времени чтобы все понять не хватает... |
|
Pascal Найти числа А и В, если известно, что первое четырехзначное число нацело делится на 99, а второе – на 49
https://www.cyberforum.ru/ pascal/ thread1105411.html Помогите плиз))) решить 3 способами стчетчик предпроверка условия постпроверка условия Даны два двузначных числа А и В. Из этих чисел составили два четырехзначных числа: первое число получили путем написания сначала числа A, а затем В; для получения второго сначала записали В, а потом А. Найти числа А и В, если известно, что первое четырехзначное число нацело делится на 99, а второе – на... |
Pascal Построить блок-схему for i:=a to b do if (i mod 2 =0) and (i mod 3 =0) then writeln(i) Добавлено через 2 часа 29 минут кто может помогите ,кто сделает Огромное Спасибо!!! https://www.cyberforum.ru/ pascal/ thread1105240.html |
|
Pascal Построить блок-схему Линейный алгоритм Написать Блок -схему Program e1; Var b,c,d:real; Begin Read (b,c); D:=sgrt(sgr(b) – 4*c); Writeln (`x1=` ,(-b+d)/2, ` x2=` , (-b-d)/2 End Заранее Всем большое спасибо |
Pascal Построить блок-схему
https://www.cyberforum.ru/ pascal/ thread1105231.html 1)Написать программу, которая вычисляет площадь равностороннего треугольника, периметр которого равен p. Программу писать не надо ,надо написать Блок-Схему заранее Всем Спасибо !!!!!!!))))) 2)Алгоритмическая структура «цикл» Program e1; Var x: byte; Begin For x:=1 to 5 do Writeln (x+1); End Программу не пишем ,пишем Блок -Схему Заранее Всем Спасибо !!! |
|
Pascal Массивы. Вывести элементы массива, размещая их там случайным образом, с задержкой в 2 секунды
https://www.cyberforum.ru/ pascal/ thread1105121.html Программа должна сформировать случайным образом массив из 20 целых чисел из отрезка и вывести элементы массива,в новом окне, размещая их там случайным образом, с задержкой в 2 секунды; окончание работы программы при нажатии на клавишу «=» |
Pascal Дана строка. Преобразовать в ней все строчные буквы (как латинские, так и русские) в прописные, а прописные — в строчные Дана строка. Преобразовать в ней все строчные буквы (как латинские, так и русские) в прописные, а прописные — в строчные.Помогите.Без stringbuilder Спасибо. |
| Pascal Функция нахождения максимума в строке матрицы и функция вычисления ||D|| Помогите написать программу. Заранее спасибо. Даны вещественные матрицы A, B, C размером 5x6. Вычислить величину (||A||+||B||+||C||)/(||A+B+C||+||A-B-C||), где ||D||= maxj |d1,j| + maxj |d2,j| +…+ maxj |d5,j|. Программа должна использовать функцию нахождения максимума в строке матрицы и функцию вычисления ||D||. https://www.cyberforum.ru/ pascal/ thread1105020.html | Pascal Составить программу для вывода на экран лучшего результата после каждого выступления фигуристов 1) На соревнованиях по фигурному катанию оценки заносятся в компьютер. Составить программу для вывода на экран лучшего результата после каждого выступления фигуристов. (не могу понять как вывести максимальное значение) 2) Даны действительное a и натуральное n. Вычислить: 1. a!; 2. 1 + 1/2 + 1/3 +1/4 + … + 1/n; 3. 1 + 2 + 4 + 8 + … + 210; 4. (1 + 2)*(1 + 2 + 3)*…*(1 + 2 + … +10);... https://www.cyberforum.ru/ pascal/ thread1104892.html |
|
Pascal Разложить функцию в ряд Тейлора Разложить в ряд Тейлора Sin 3500; Ln(1.3) |
Pascal Написать массив домино по цепочке Написать массив домино по цепочке Найдите ошибку и исправьте плизз...... program dom; uses crt; const nmax=28; type space=0..6; myarray=array of 0..1; var a: MyArray; https://www.cyberforum.ru/ pascal/ thread1104752.html |
|
100 / 100 / 86
Регистрация: 20.10.2013
Сообщений: 186
|
|
| 25.02.2014, 20:14 | 0 |
Найти произведение двузначных нечетных чисел, кратных 13 - Pascal - Ответ 582922625.02.2014, 20:14. Показов 4793. Ответов 4
Метки (Все метки)
Ответ
да вроде правильно все решено, в чем проблема то?
Вернуться к обсуждению: Найти произведение двузначных нечетных чисел, кратных 13 Pascal
0
|
|
| 25.02.2014, 20:14 | |
|
Готовые ответы и решения:
4
найти произведение всех двузначных чисел(паскаль) |
| 25.02.2014, 20:14 | |
| 25.02.2014, 20:14 | |
|
Помогаю со студенческими работами здесь
0
найти произведение чисел,кратных 10 на отрезке [60;260]
|