Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Attels
0 / 0 / 0
Регистрация: 16.02.2014
Сообщений: 22
1

Строковая переменная

23.02.2014, 19:56. Просмотров 886. Ответов 2
Метки нет (Все метки)

Как сделать что-то типо такого в программе.
Введите слово.
Если слово "ДА" написать "Верно"
Если слово "НЕТ" написать неверно
?
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.02.2014, 19:56
Ответы с готовыми решениями:

Оператор Case и строковая переменная
Как работать с case если проверяемая переменная строкового типа? var st:string; ///// case st...

Строковая переменная и библиотека граф
Подскажите, а как сделать чтобы в конце программы (скажем это как бы тест) суммировались правильные...

строковая последовательность
Вводится строка. Распечатать слова, имеющие максимальную длину, Слово – последовательность...

Символьная и строковая информация
Задать слово, последовательно вводить буквы и после ввода выдавать сообщение, есть ли тая буква и...

Строковая задача: входит ли данное буквосочетание в данную фразу
Помогите составить программу в паскале. К этой задаче. Определите входит ли данное буквосочетание в...

2
dencil
10 / 10 / 22
Регистрация: 23.09.2013
Сообщений: 145
23.02.2014, 21:28 2
Лучший ответ Сообщение было отмечено Attels как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var s:string;
begin
repeat
writeln('Введите строку'); 
readln(s);
until (s='ДА') or (s='НЕТ');
if s='ДА' then 
writeln('Верно');
if s='НЕТ' then
writeln('Неверно');
 
readln
end.
1
Attels
0 / 0 / 0
Регистрация: 16.02.2014
Сообщений: 22
24.02.2014, 18:52  [ТС] 3
Не подскажите, а как сделать чтобы в конце программы (скажем это как бы тест) суммировались правильные ответы и на этом основании выдавалась последняя фраза. Я знаю что это не верно, но хочу передать смысл:
var s:string;
begin

repeat
writeln('Введите строку');
readln(s);
until (s='ДА') or (s='НЕТ');
if s='ДА' then
writeln('Верно');
if s='НЕТ' then
writeln('Неверно');

repeat
writeln('Введите Другую строку');
readln(x);
until (x='ДА') or (x='НЕТ');
if x='ДА' then
writeln('Верно');
if x='НЕТ' then
writeln('Неверно');


if s='Да' and x='Да' then
write ('что то');


readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.02.2014, 18:52

Строковая переменная
Привет всем! Изучаю С++. Ну, проблему кодировки в консольном окне вреде бы решил (работаю в Vicual...

строковая переменная
Скажите пожалуйста как в Борланде огласить строковую переменную. И какие библиотеки для этого надо...

Строковая переменная
Была простейшая программа. Воспользовавшись вашим советом использовать оператор LOCATE, получил...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru