Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Сумма четных чисел я тупица!!!!! решите программы!:( пожалуйста:( найти сумму первых десяти четных числ, начиная с 8 https://www.cyberforum.ru/ pascal/ thread134742.html начало((( Pascal
напишите плиз начало к задачке умоляюю!!((( for i:=1 to 4 do begin j:=1; l:=true; while (j<=5 and l) do if a=10 then begin
Pascal Вывод на экран двузначных чисел из файла https://www.cyberforum.ru/ pascal/ thread134735.html
Прет всем! не могу закончить задания на паскале. нужно вывести из файла на экран строки с двузначными числами. Вроде написано но не хочет работать, проверьте плиз и подскажите ошибку.... Заранее спс) код написанной программы. program text; {название программы} uses crt;{подключение модуля для работы с экраном} var f: text;
Pascal В ЭВМ вводятся координаты N точек и R https://www.cyberforum.ru/ pascal/ thread134733.html
В ЭВМ вводятся координаты N точек. Определить, сколько из них попадает в круг радиусом R с центром в точке (a,b). Я ее решил так: program Fyy; uses crt; Var x,y,k,R:integer; Begin write('BBeDuTe R: '); readln(R);
Pascal работа с файлами
По умолчанию работа с файлами Доброго времени суток, столкнулся с проблемой при написании программы ддля задачи: Даны два файла. One, Two. Требуется переименовать One -> First, дописав в него: вторник и вывести содержимое. Файл One: (изначальный вариант) Понедельник Среда Четверг Пятница Суббота Файл Two:
Pascal Работа со списком https://www.cyberforum.ru/ pascal/ thread134713.html
Известны марки машин, изготавляемых в данной стране и импортируемых за рубежом. Даны некоторые N стран. Определить для каждой марок, кикие из них были: доставленны во все страны; доставленные в некоторые из стран; не доставленны ни в одну страну
Pascal Тип указатель Нам дали программу,задание: объяснить для чего она нужна. Программа не работает, в первой же строке Type Mismatch. Посмотрите, пожалуйста, кому не сложно. Вот текст программы: Uses crt; Type ref=^integer; Var p,q:ref; Begin p:=5; https://www.cyberforum.ru/ pascal/ thread134712.html Pascal Посматрите кому не сложно Тема файлы
Дан файл (*.txt) с произвольным текстом. Упорядочить все слова по количеству букв. Записать полученный результат в другой файл. я сделал чтобы упорядочить пл количеству букв, но не знаю как записать полученый результат в другой файл. program zadacha; uses crt; label 1,2,3,4; var a,b:string; i,j,n,max,k:integer; x,s:array of string; clrscr; writeln('ввод строки:');
Pascal построить график функции помогите построить график функции y=+-(6*sqrt(1-(sqr(x-2))/36+3) https://www.cyberforum.ru/ pascal/ thread134684.html Pascal Обработка матриц с небольшим количеством строк или столбцов Методика выполнения работы. Согласно предложенному варианту задания, разработать схему алгоритма и программу для ввода исходных данных, обработки данных и вывода результатов. Программа должна включать: 1) объявление массивов вещественных данных; 2) открытие файлов для чтения (ввода) данных и для записи (вывода) данных; 3) с помощью отдельных процедур с параметрами выполнить: - ввод... https://www.cyberforum.ru/ pascal/ thread134680.html
Pascal Составить программу, формирующую текстовый файл f из 9-ти строк
Составить программу, формирующую текстовый файл f из 9-ти строк, в первой из которых одна литера «1», во второй – две литеры «2»,…, в девятой – девять литер «9».
Pascal Переписать все числа файла в массив в том же порядке https://www.cyberforum.ru/ pascal/ thread134673.html
Добрый день!!! пожалуйста помогите решить эти задачки... Дан двумерный массив. Составить программу: а) вывода на экран любого элемента второй строки массива б) вывода на экран любого элемента массива и Имеется файл, в котором записаны 12 вещественных чисел. Переписать все числа файла в массив в том же порядке.
0 / 0 / 0
Регистрация: 12.04.2010
Сообщений: 26
0

цифра сотен равна среднему арифметическому цифр исходного числа; - Pascal - Ответ 749576

24.05.2010, 14:49. Показов 1435. Ответов 1
Метки (Все метки)

Студворк — интернет-сервис помощи студентам
помогите пожалуйста с программой!!




14. Дано трехзначное натуральное число. Распечатать число, у котрого цифра сотен равна среднему арифметическому цифр исходного числа;

Вернуться к обсуждению:
цифра сотен равна среднему арифметическому цифр исходного числа; Pascal
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.05.2010, 14:49
Готовые ответы и решения:

Вывести число, полученное при перестановке цифр сотен и единиц исходного числа
Задание: Дано четырехзначное число. Вывести число, полученное при перестановке цифр сотен и единиц...

Найти все трехзначные числа, средняя цифра которых равна сумме первой и третьей цифр
Помогите пожалуйста на ABC паскаль сделать задачу: Найти все трехзначные числа, средняя цифра...

Найти все Трехзначные числа у которых первая и вторая цифра числа равна третьей
Помогите пожалуйста мне надо до завтра написать вот эти проги на паскале, а то завтра зачет а я не...

Найдите все трехзначные числа, сумма цифр которых равна произведению цифр
Найдите все трехзначные числа, сумма цифр которых равна произведению цифр

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

Получить из цифр числа четырехзначные числа, у которых цифры исходного числа идут в том же порядке
Задано натуральное трехзначное число. Получить из его цифр четырехзначные числа, у которых цифры...

Найти все четырёхзначные числа, у которых сумма крайних цифр равна сумме средних цифр, а само число делится на 6 и 27.
Помогите решить ещё одну задачку :) Найти все четырёхзначные числа, у которых сумма крайних цифр...

Найти все четырехзначные числа,у которых сумма крайних цифр равна сумме средних цифр,а само число делится на 6 и 27
Найти все четырехзначные числа,у которых сумма крайних цифр равна сумме средних цифр,а само число...

Верно ли что число 4-значное и у него сумма крайних цифр равна сумме средних цифр? Найти все такие числа.
Написать программу : Дано нат. число. Верно ли что число 4-значное и у него сумма крайних цифр...

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