Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
stnicolay2007
28.08.2020 13:23 •
Информатика
Дано предложение. напечатать его слова в обратном порядке.(паскаль)
Показать ответ
Ответ:
rolik8
02.10.2020 12:55
Var a:string;
i,k:integer;
b:char;
begin
writeln('Введите строку: ');
readln(a);
k:=length(a);
for i:=1 to round(k/2) do
begin
b:=a[i];
a[i]:=a[k-i+1];
a[k-i+1]:=b;
end;
writeln;
writeln('Итоговая строка: ');
writeln(a:7);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Fogles12
31.12.2020 00:33
Определите, какое из указанных ниже имён файлов удовлетворяет маске: ?ger*.??* 1) triger.olo; 2) 1gerdos.api; 3) gerr.msi; 4) 3lgerf.doc. Символ ? (во знак означает...
ismailov34667
03.08.2020 10:08
Web-параққа кестелер қандай мақсатпен қосылады?...
muslim38
05.06.2023 06:26
Неліктен сайттың ішінде абсолюттік сілтемелерді қоодануға болмайды?...
сауле49
22.02.2023 11:59
Рассчитайте информационный объем видеопамяти для графического режима с пространственным разрешением 800x600 точек и глубиной цвета 8 бит. ответ дайте в кбайтах....
youngfng
22.02.2023 11:59
Сколько байт информации содержит сообщение объемом 0,75 кбайт?...
Liza200011111
22.06.2020 17:38
Асаламалейкум братья, нужен ответ на информатику. В интернете найти не могу. Думаю вы Роман Павлович, если вы это читаете, то это точно не 7 класс) Вот само задание...
big31
25.01.2020 21:21
сделать задание по информатике. 2 таблицы истинности,...
Артём2006706
07.01.2020 10:23
обчисліть масу води яку можна нагріти від 0° до 100° повністю спаливши 0.5л гасу с полным обьяснением....
sofiyamotkova
19.12.2022 00:06
Число устьиц на листе огромно больше Укажите правильный ответ:статысячидесятимиллиона...
Elizafeta1
13.01.2021 17:39
Translate the following sentences using the gerund in the function of an adverbial modifier. 1. Он включил меня в список экскурсантов без лишних разговоров. 2. Она...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,k:integer;
b:char;
begin
writeln('Введите строку: ');
readln(a);
k:=length(a);
for i:=1 to round(k/2) do
begin
b:=a[i];
a[i]:=a[k-i+1];
a[k-i+1]:=b;
end;
writeln;
writeln('Итоговая строка: ');
writeln(a:7);
end.