1.Используя функции символьных переменных, написать программку, которая из текста Я очень
1.Используя функции символьных переменных, написать программу, которая из текста Я очень хорошая вычислительная машина, получила бы текст Я превосходная машина.
2.Используя функции символьных переменных, написать программу получения из слова ЖЕЛЕЗНОДОРОЖНИК слов ДОНОР, ЖЕЗЛ, КОЛЕНО, КРОКОДИЛ.
Михаил
Pascal
1 ответ
Марина Сомнова
Эмм.. Pascal:
////////////////////
var
a, b, c:String;
begin
a := 'Я очень превосходная вычислительная машина';
b := 'Я превосходный бот';
writeln('Введите текст ', a, ' и получите текст', b);
readln(c);
if a = c then
begin
writeln(b);
end;
end.
Ответ 2:
var
b: array [1..4] of String[9] = ('ДОНОР', 'ЖЕЗЛ', 'КОЛЕНО', 'КРОКОДИЛ');
a, c:String;
i:Integer;
begin
a := 'ЖЕЛЕЗНОДОРОЖНИК';
writeln('Введите текст ', a, ' и получите слова');
for i:= 1 to 4 do
begin
writeln(b[i]);
end;
readln(c);
if a = c then
begin
for i:= 1 to 4 do
begin
writeln(b[i]);
end;
end;
end.
////////////////////
var
a, b, c:String;
begin
a := 'Я очень превосходная вычислительная машина';
b := 'Я превосходный бот';
writeln('Введите текст ', a, ' и получите текст', b);
readln(c);
if a = c then
begin
writeln(b);
end;
end.
Ответ 2:
var
b: array [1..4] of String[9] = ('ДОНОР', 'ЖЕЗЛ', 'КОЛЕНО', 'КРОКОДИЛ');
a, c:String;
i:Integer;
begin
a := 'ЖЕЛЕЗНОДОРОЖНИК';
writeln('Введите текст ', a, ' и получите слова');
for i:= 1 to 4 do
begin
writeln(b[i]);
end;
readln(c);
if a = c then
begin
for i:= 1 to 4 do
begin
writeln(b[i]);
end;
end;
end.
Полина
Спасибо!!! А можно ещё вторую?
Дарья Бекешева
Извините, но почему-то при вводу этой программы в Pascal вывод получатся неправильным
Галина Меретукова
Вы точно все написали как было сказано?Большие буковкы и т.д.
Юрий
да я еще дописываю
Степан Аметов
ща*
Семён Луць
Да, и вот что выходит "Введите текстЯ очень хорошая вычислительная машинаи получите текстЯ превосходный бот"
Пашка Шипица
И вот во второй задаче, абсурд "Введите текстЖелезнодорожники получите текст[ДОНОР,ЖЕЗЛ,КОЛЕНО,КРОКОДИЛ]"
Селютин
Семён
насколько я сообразил надо что бы юзер ввел ЖЕЛЕЗНОДОРОЖНИКИ и получил ДОНОР, ЖЕЗЛ и т.д.
Димион
Лариса
Вводите все точно так же как и написано в примере, учитывая большие буковкы, и т.д
Нина
Я просто скопировала и воткнула и ничего не изменяла
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Облако тегов