Регистрация
ДавыдоваЮлия5689
20.07.2022 08:36
Информатика
Есть ответ 👍

Pascal abc дана строка, состоящая из маленьких букв и цифр. удалить гласные буквы в конце строки от последней не гласной буквы или цифры (конечные гласные буквы). вывести преобразованную строку и количество удаленных символов

148
219
Посмотреть ответы 2

Ответы на вопрос:

maksim393
maksim393
4,8(70 оценок)
Const   gl='aeiouy';   var   s: string;   i,l,n,p: integer;   begin   write('введите строку: '); readln(s);   l: =length(s);   for i: =l downto 1 do       if pos(s[i],gl)=0 then begin           p: =i+1; n: =l-p+1;           delete(s,p,n);           writeln(s); writeln('удалено символов: ',n);           break           end end.
ilyhan787228
ilyhan787228
4,5(7 оценок)
Ответ номер 3 .  па́мятник   клавиату́ре — первая  в  екатеринбурге   лэнд-арт скульптура,  посвящённая компьютерной клавиатуре, на 8 марта 96, со стороны улицы  гоголя. открыта 5 октября 2010 года. автор — анатолий вяткин.

Популярно: Информатика