Задать вопрос
4 ноября, 18:30

Дано предложение. Напечатать его слова в обратном порядке. (Паскаль)

+2
Ответы (1)
  1. 4 ноября, 21:12
    0
    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.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано предложение. Напечатать его слова в обратном порядке. (Паскаль) ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Ввести слово и число раз (Ввод; паскаль, 3). Вывести это слово так: паскаль паскаль паскаль паскаль паскаль паскаль
Ответы (1)
Помгите! Программа Паскаль Вопрос 1. Функция служебного слова Var. Вопрос 2. С какими числами можно работать в программе Паскаль? Вопрос 3. Оператор ввода. Как он записывается в Паскаль? Вопрос 4. Функция служебного слова Const. Вопрос 5.
Ответы (1)
1) дана строка S определить и напечатать сколько символов * 2) дана строка S вместо каждого символа * записать символы 0 Напечатать полученную строку 3) дана строка S получить и напечатать строку Т образуемую путем прочтения строки S начиная с ее
Ответы (1)
Помогите сделать программу паскаль (массивы) даны нат. числа а1, а2, а3 ... аn. напечатать их в обратном порядке
Ответы (1)
1. Переведите на язык программирования: а) ввести А и С увеличить А в 10 раз уменьшить С в 20 раз напечатать модуль разности А и С б) ввести А и С если А>С, то увеличить А в 5 раз иначе уменьшить С в 2 раза напечатать значения А и С конец в) ввести
Ответы (1)