Напишите программу для вывода на экран последовательности символов : ABBCCCDDDD…ZZZZZZZZZZZZZZZZZZZZZZZZZZ Напишите программу, которая выводит «Да», если буква «а» встречается в тексте чаще, чем буква?

Rita10598 9 февр. 2020 г., 10:36:37

1)Program Z1 ;

Var st : string ;

i, j, k : integer ;

Begin

k : = ord('A') ;

For i : = 1 to 26 do begin

For j : = 1 to i do begin

write(chr(k)) ;

end ;

k : = k + 1 ;

end ;

end.

2)Program Z2 ;

Var st : string ;

i, c, c1 : integer ;

Begin

Writeln('Введите строку') ;

Readln(st) ;

For i : = 1 to length(st) do begin

if st[i] = 'а' then inc(c) ;

if st[i] = 'о' then inc(c1) ;

end ;

if c> ; c1 then writeln('Да') else writeln('Нет') ;

end.

3)Program Z3 ;

Var st, st1, st2, st3 : string ;

k, n : integer ;

Begin

Writeln('Введите строку') ;

Readln(st) ;

Writeln('Введите k') ;

Readln(k) ;

n : = length(st) ;

st1 : = copy(st, 1, k) ;

st2 : = copy(st, n - k + 1, k) ;

st3 : = copy(st, k + 1, n - 2 * k) ;

st : = st2 + st3 + st1 ;

Writeln(st) ;

end.

4)Program Z4 ;

Var st, st1, st2 : string ;

n, i : integer ;

Begin

Writeln('Введите строку') ;

Readln(st) ;

Writeln('Введите букву для удвоения') ;

Readln(st1) ;

n : = length(st) ;

For i : = 1 to n do begin ;

if st[i] = st1 then st2 : = st2 + st[i] + st[i] else st2 : = st2 + st[i] ;

end ;

Writeln(st2) ;

end.

5)Program Z5 ;

Var st, st1 : string ;

n, i : integer ;

Begin

Writeln('Введите строку') ;

Readln(st) ;

n : = length(st) ;

For i : = 1 to n do begin

if (st[i] = 'ж') or (st[i] = 'ш') then st1 : = st1 + st[i] + 'и' else st1 : = st1 + st[i] ;

end ;

writeln(st1) ;

end.

6)Program Z6 ;

Var st, st1 : string ;

n, i : integer ;

Begin

Writeln('Ââåäèòå ñòðîêó') ;

Readln(st) ;

n : = length(st) ;

st : = ' ' + st + ' ' ;

For i : = 1 to n do

if st[i] = ' ' then begin delete(st, i + 1, 1) ; delete(st, i - 1, 1) ;

end ;

writeln(st) ;

end.

(Все программы проверени и откомпелированы на Pascal.

NET, Если есть вопросы, пишите.

).

Lpozharova 26 дек. 2020 г., 08:32:05 | 5 - 9 классы

Плиииз?

Плиииз!

Люди решите!

Напишите программу определяющую какая из букв первая или последняя встречаются в заданном слове чаще.

Джувия5Локсар 20 июл. 2020 г., 11:06:48 | 5 - 9 классы

1. Даны две строки?

1. Даны две строки.

Написать программу для вывода на экран слова полученного из суммы двух первых букв каждой строки.

2. Дана строка.

Определить есть ли в данной строке буква h.

Natig17 5 нояб. 2020 г., 06:43:32 | 5 - 9 классы

Даны две строки?

Даны две строки.

Написать программу для вывода на экран слова полученного из суммы двух вторых букв каждой строки.

Пожалуйста!

Срочно!

Sportgirl 20 дек. 2020 г., 02:01:38 | 5 - 9 классы

Дана строка ?

Дана строка .

Написать программу для вывода на экран первой буквы строки.

Срочно!

(паскаль).

Leowr 24 авг. 2020 г., 00:37:38 | 5 - 9 классы

1. Дана строка символов?

1. Дана строка символов.

Напечатать новый текст, удалив из старого символы, находящиеся внутри круглых скобок.

Скобки тоже удалить.

Подсчитать количество удалённых символов.

Предполагается, что внутри каждой пары скобок других скобок нет 2.

Начертите блок - схему и напишите паскаль - программу для решения следующей задачи : «Ввести текст длиной до 254 символов.

Вывести на экран слова, начинающиеся с заглавной буквы.

Количество таких слов также вывести на экран».

Нужна полностью написанная программа.

Kalerija 31 мая 2020 г., 10:44:10 | 1 - 4 классы

Дано целое число?

Дано целое число.

Напишите программу, которая выводит на экран последнюю букву данного числа, потом вводит её в квадрат и выводит на экран монитора результат.

Suvenir1989 22 нояб. 2020 г., 07:23:29 | 10 - 11 классы

Помогите написать программу на паскале?

Помогите написать программу на паскале!

Выбрать из текста слова в которых первая буква совпадает с последней, слова в тексте разделены пробелами.

Sardar1999 14 нояб. 2020 г., 07:53:25 | 5 - 9 классы

Составить программу определяющую, какая из букв «е» или «о» встречается в тексте чаще?

Составить программу определяющую, какая из букв «е» или «о» встречается в тексте чаще.

Alenabsopova 30 окт. 2020 г., 22:34:27 | 5 - 9 классы

1)Напишите программу, в которой вводится символ, если он находится в интервале '0'?

1)Напишите программу, в которой вводится символ, если он находится в интервале '0'.

. . '9', то на экран выводится его код, в противном случае на экран выводятся следующие за ним 2 символа 2)Напишите программу, которая при вводе латинской прописной буквы выводит на экран такую же букву, но строчную НА ПАСКАЛЕ!

Dalibovsaid 28 окт. 2020 г., 22:24:00 | 10 - 11 классы

Как на паскале abc net написать программу которая выводит на экран текст несколько раз?

Как на паскале abc net написать программу которая выводит на экран текст несколько раз.