0 / 0 / 0
Регистрация: 06.12.2009
Сообщений: 11
1

Присвоить логической переменной t значение true, если выполняется логическое условие

11.12.2009, 22:02. Показов 3892. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Добрый вечер. В паскале я разбираюсь пока не очень. Вот решил задачу, но сомневаюсь насчет правильности решения. Подскажите пожалуйста если что не так.

Имеется литерная переменная d. Присвоить логической переменной t значение true, если выполняется логическое условие, и значение false в противном случае.
значение d – это литера ‘*’.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
Uses crt;
var
    t:boolean;
    d:char;
Begin
Clrscr;
writeln('Введите d:');
readln(d);
If (d in['*']) then t:=true else t:=false;
writeln(t);
readln;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.12.2009, 22:02
Ответы с готовыми решениями:

Логической переменной "Nachalo" присвоить значение true, если начало системы координат попадает внутрь прямоугольника
Логической переменной "Nachalo" присвоить значение true, если начало системы координат попадает...

Логической переменной T присвоить значение true или false в зависимости от того, является натуральное число R , не большего 100000, степенью 3 или нет
Здравствуйте, помогите пожалуйста, есть задача: Логической переменной T присвоить значение true...

Переменной L присвоить значение True, если в массиве нечетное число элементов
Создать файл, содержащий массив целых чисел. Определить количество элементов массива. Переменной L...

Присвоить логической переменной T значение true, если значение d-цифра, и значение false в противном случае
Имеется символьная переменная d, присвоить логической переменной T значение true, если значение...

3
58 / 57 / 5
Регистрация: 01.12.2009
Сообщений: 177
11.12.2009, 22:04 2
Delphi
1
2
3
4
5
6
7
8
9
10
11
var
    t:boolean;
    d:char;
Begin
Clrscr;
writeln('Введите d:');
readln(d);
If (d='*') then t:=true else t:=false;
writeln(t);
readln;
end.
хотя и ваш вариант тоже будет работать.
1
Эксперт по компьютерным сетямЭксперт Pascal/Delphi
4190 / 1291 / 237
Регистрация: 27.07.2009
Сообщений: 3,962
11.12.2009, 22:05 3
MIKE72, правильно, но лучше так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
Uses crt;
var
    t:boolean;
    d:char;
Begin
Clrscr;
writeln('Введите d:');
readln(d);
If d ='*' then t:=true else t:=false;
writeln(t);
readln;
end.
1
0 / 0 / 0
Регистрация: 06.12.2009
Сообщений: 11
11.12.2009, 22:08  [ТС] 4
спасибо!
0
11.12.2009, 22:08
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.12.2009, 22:08
Помогаю со студенческими работами здесь

Логической переменной P присвоить значение TRUE, если целое N — простое число
Логической переменной P присвоить значение TRUE, если целое N (N>1) - простое число, и значение...

Логической переменной b присвоить значение true, если числа x и y равны и значение false иначе
логической переменной b присвоить значение true если числа x и y равны и значение false иначе

Логической переменной р присвоить значение true, если целое n (n>1) - простое число, и значение false - иначе
Логической переменной р присвоить значение true, если целое n (n>1) - простое число, и значение...

Логической переменной присвоить значение true, если точка принадлежит заштрихованной области
Стоит задача: логической переменной p присвоить значение true, если точка с координатами x и y...

Логической переменной присвоить значение true, если точка принадлежит заштрихованной области
Логической переменной p присвоить значение true, если точка с координатами x и у принадлежит...

Логической переменной R присвоить логическое выражение, реализующее указанное условие
помогите пожалуйста решить задачу. логической переменной R присвоить логическое...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

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