Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
PascalABC.NET Програмка на Pascal - Ввести последовательность натуральных чисел https://www.cyberforum.ru/ pascalabc-net/ thread791071.html
Кодирую на Pascal.Net.Столкнулся с этой задачей и не понимаю как ее составить.Помогите кто чем может,пожалуйста. Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию или по невозрастанию, удалить из последовательности числа - палиндромы, и продублировать числа, заканчивающиеся нулем. В противном случае упорядочить последовательность по неубыванию...
Вставьте вместо пропусков знаки (,),-,+,*,/ так, чтобы тождество стало верным (додумать) PascalABC.NET
var c,a,v:integer; k: array of integer; b:string; n:integer; i:integer; begin Writeln ('Задача: вставьте вместо пропусков знаки (,),-,+,*,/ так, чтобы тождество стало верным (всего 8 знаков):'); writeln; writeln('3_2_2_3_2_2_2_2_3=8'); writeln;
PascalABC.NET Изменение строки в цикле в цикле for i := 1 to length(s) изменять длину s можно без всяких последствий? Добавлено через 31 минуту кажется, я понял само изменение к ни чему особо страшному не приведет, но запара с счетчиком скорее всего будет https://www.cyberforum.ru/ pascalabc-net/ thread790908.html PascalABC.NET Вычислить значение выражения https://www.cyberforum.ru/ pascalabc-net/ thread790887.html
Задание: Разработать программу для вычисления: 1) значения заданного арифметического выражения (см. вариант по таблице 1); Вот что я накалякала: var e,x,y,z,h:real; begin x:=36; y:=1; e:=(ln(exp(-sqrt(abs(x))*ln(y))))*(sin(x)+exp(x+y));
PascalABC.NET динамическое программирование
создание списка по типу "стек" и вывод на печать: не понимаю, где ошибка, подскажите. type PNode=^TNode; TNode=record data:integer; next:PNode; end; var f,g:PNode; c:integer;
PascalABC.NET Графический буфер? Перерисовка уже сформированной картинки. GraphABC https://www.cyberforum.ru/ pascalabc-net/ thread790587.html
"И снова здрасте":) Продолжаю мучать игру "морской бой" и модуль GraphABC. Хочу сделать, чтобы выводилось на экран две сетки, плюс набор кораблей для расстановки, клик по кораблю (думаю зафиксировать размер окна и считывать координату клика и определять тип корабля) он выбирается и граф.примитив в виде прямоугольника(соответствующего типу корабля) привязывается к курсору, т.е. им можно двигать...
PascalABC.NET Нужно на завтра переписать код с С на PascalABC алгоритма Коэна — Сазерленда по отсечению отрезка https://www.cyberforum.ru/ pascalabc-net/ thread790331.html
Здраствуйте, Господа. Помогите переписать код с С на PascalABC( алгоритм по отсечению отрезка Коэна — Сазерленда) Первый исходник на вики http://ru.wikipedia.org/wiki/%D0%90%D0%BB%D0%B3%D0%BE%D1%80%D0%B8%D1%82%D0%BC_%D0%9A%D0%BE%D1%8D%D0%BD%D0%B0_%E2%80%94_%D0%A1%D0%B0%D0%B7%D0%B5%D1%80%D0%BB%D0%B5%D0%BD%D0%B4%D0%B0 #define LEFT 1 /* двоичное 0001 */ #define RIGHT 2 /* двоичное 0010 */...
Вычислить значение выражения PascalABC.NET
Помогите решить второй пример 2…
PascalABC.NET решение примера Поиогите решить этот пример … https://www.cyberforum.ru/ pascalabc-net/ thread790288.html PascalABC.NET решение примеров https://www.cyberforum.ru/ pascalabc-net/ thread790281.html
Мой 29 вариант нужна помощь в решении этих примеров … так если честно занимаюсь пк а тут не могу все уменя с ошибками
Дана целочисленная квадратная матрица PascalABC.NET
Дана целочисленная квадратная матрица. 1) Определить превышают ли все элементы выше главной диагонали, элементы, расположенные ниже ее симметрично (т.е. Aij сравнивается с Aji). 2) удалить строки матрицы, в которых есть хотя бы один нулевой элемент.
PascalABC.NET Свойства программы Здравствуйте, в редакторе форм можно задать свойства программы (версию, автора, авторские права и пр.). А можно это сделать с помощью кода? Если да, то как? P.S. На скринах видно, что требуется. https://www.cyberforum.ru/ pascalabc-net/ thread789500.html
3030 / 1916 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
21.02.2013, 20:39 0

Составить программу, печатающую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае - PascalABC.NET - Ответ 4163951

21.02.2013, 20:39. Показов 22608. Ответов 2
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
Var
  n: Integer;
BEGIN
Repeat
 Write('Введите четырехзначное число: ');
 Readln(n);
until (1000<=n) and (n<=9999);
Writeln(n div 1000 mod 10+n div 100 mod 10=n div 10 mod 10+n mod 10)
END.


Вернуться к обсуждению:
Составить программу, печатающую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае PascalABC.NET
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.02.2013, 20:39
Готовые ответы и решения:

Составить программу, печатающую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае
Помогите пожалуйста решить задачу! Квадрат заданного трехзначного числа равен кубу суммы цифр...

Составить программу, печатающую значение true, если указанное высказывание является истинным, и false – в противном случае
все цифры заданного четырехзначного числа N различны.

Составить линейную программу, печатающую значение true, если указанное высказывание является истинным, и false — в противном случае.
Помогите решить плиз, очень надо, заранее огромное спасибо. Тока пишите подробно я полный профан в...

Составить программу печатающую значение true, если указанное высказывание верно, а false в противном случае:
1)Составить программу печатающую значение true, если указанное высказывание верно, а false в...

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

Составить программу печатающее значение true, если указанное высказывание является истинным и false если ложным
все цифры данного четырех значного числа N различны

Составить программу, печатающую значение true, если указанное высказывание является истинным, и false в противном случае
1. Составить программу, печатающую значение true, если указанное высказывание является истинным, и...

Составить линейную программу,печатающую значение true , если указанное высказывание является истинным,и false в противном случае
Составить линейную программу,печатающую значение true , если указанное высказывание является...

Составить линейную программу, печатающую значение true, если указанное высказывание является истинным, и false — в противном случае.
Составить линейную программу, печатающую значение true, если указанное высказывание является...

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