Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 18.01.2010
Сообщений: 9

Вывести TRUE

15.05.2010, 14:15. Показов 1064. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем доброго времени суток!
Вот две задачки:

1.С клавиатуры вводятся координаты точки А.Вывести TRUE , если точка находится по правую сторону от графика функции y=2*x+3, FALSE - в ином случае .

2.С клавиатуры вводятся 3 числа X,Y и Z.
Вывести на экран TRUE в случае, если можно составить ПРЯМОУГОЛЬНЫЙ треугольник из сторон с длинами рёбер , равным данным числам.Вывести FALSE в ином случае.

Всем заранее спасибо!
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
15.05.2010, 14:15
Ответы с готовыми решениями:

вывести ответ true или false
Помогите плиз как решить на паскале не смог решить.Здесь прога должна вывести ответ true или false!!!!! Числа а и b выражают длины...

True or False|Вывести длину данного отрезка в метрах
1.Даны координаты (как целые от 1 до 8) двух различных полей шахматной доски.Если конь за один ход может перейти с одного поля на...

Если в наборе присутствует число, меньшее K, то вывести True
Я в паскали совершенно ничего не понимаю, но мне задаи непонятные для моего мышления задачи! Я прошу вас помочь мне и спасти меня! Помогите...

1
 Аватар для Vovan-VE
13210 / 6599 / 1041
Регистрация: 10.01.2008
Сообщений: 15,069
15.05.2010, 15:02
Лучший ответ Сообщение было отмечено antiv18 как решение

Решение

1.
Pascal
1
2
3
4
5
6
7
8
9
var x,y:Real;
begin
    write('x=');
    readln(x);
    write('y=');
    readln(y);
    writeln(y < 2*x+3);
    readln;
end.
2.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var x,y,z:Real;
begin
    write('x=');
    readln(x);
    write('y=');
    readln(y);
    write('z=');
    readln(z);
    if x>y then begin
        if x>z then begin
            writeln(sqr(x) = sqr(y)+sqr(z));
        end else begin
            writeln(sqr(z) = sqr(x)+sqr(y));
        end;
    end else begin
        if y>z then begin
            writeln(sqr(y) = sqr(x)+sqr(z));
        end else begin
            writeln(sqr(z) = sqr(x)+sqr(y));
        end;
    end;
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
15.05.2010, 15:02
Помогаю со студенческими работами здесь

Вывести true если введенный символ является гласной буквой
Программа должна выдавать true если введенный символ является гласной. Паскаль.Использовать функции в модуле. (Заранее спасибо!)

Если ферзь за один ход может перейти с одного поля на другое, вывести логическое значение True
Даны координаты (как целые от 1 до 8) двух различных полей шахматной доски. Если ферзь за один ход может перейти с одного поля на другое,...

Дано целое число N>0, если оно является степенью числа 3 то вывести TRUE, если нет - FALSE
Дано целое число N&gt;0, если оно является степенью числа 3 то вывести TRUE, если нет - FALSE

Вывести True, если натуральное число N является точным квадратом, иначе вывести False
Составить программу, печатающую значение true, если высказывание вашего варианта является истинным, и false — в противном случае. Данные...

Вывести слово TRUE, в том случае, точка принадлежит заштрихованной области
При решении задачи оператор if не использовать Задача: Даны вещественных числа - координаты точки на плоскости. Вывести слово TRUE,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru