natabodrikova
?>

Найти ошибку в программе var s: string; n: integer; begin write('введите предложение на языке: '); readln(s); for n: =1 to length (s) do if s[n]= 'a' or 'e' or 'i' or 'o' or 'u' then x: =x+1; write('количество гласных букв = ', x); end.

Информатика

Ответы

Алина1564
Var s:string;
n,x:integer;
begin
writeln('Введите предложение на английском языке:');
readln(s);
x:=0;
for n:=1 to length (s) do
 if (s[n]='a')or(s[n]='e')or(s[n]='i')or(s[n]='o')or(s[n]='u')or(s[n]='y')
  then x:=x+1;
// можно так:
//if s[n] in ['a','e','i','o','u','y'] then x:=x+1;
write('Количество гласных букв = ',x);
end.

Пример:
Введите предложение на английском языке:
primer
Количество гласных букв = 2
info6
Python

a = True

b = int(input())

while (a):

   if b == 1:

       print("Понедельник")

       a = False

   elif b == 2:

       print("Вторник")

       a = False

   elif b == 3:

       print("Среда")

       a = False

   elif b == 4:

       print("Четверг")

       a = False

   elif b == 5:

       print("Пятница")

       a = False

   elif b == 6:

       print("Суббота")

       a = False

   elif b == 7:

       print("Воскресенье")

       a = False

   else:

       print("Такого дня недели нет")

       b = int(input())

Осуществляется ввод, если b > не 1 - 7, то программа запрашивает число до тех пор, пока пользователь не введет нужное число.

verynzik66525

1)Архиватор – это программа, которая осуществляет сжатие одного или множества файлов с последующей упаковкой в архив. Говоря более простым языком, она может как уменьшить размер одной песни или текстового документа, так и сделать это с несколькими, создав архив - один файл из множества, который потом можно распаковать и на выходе получить исходную информацию до упаковки и сжатия.

2)Архиватор позволяет создавать различные виды архивов: архив из группы файлов или из одного файла, многотомный архив, непрерывный архив, архивы разных форматов (rar, zip, sfx). Многотомный архив – это один архивный файл, хранящийся на нескольких носителях.

3)Подробный обзор и ссылки на скачивание лучших программ для архивации данных — архиваторов — для компьютеров на базе ОС Windows. ... При упаковке некоторых видов файлов их конечный размер может быть уменьшен на 90-95%. Все современные.

Объяснение:

можно ответ лучшим

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Найти ошибку в программе var s: string; n: integer; begin write('введите предложение на языке: '); readln(s); for n: =1 to length (s) do if s[n]= 'a' or 'e' or 'i' or 'o' or 'u' then x: =x+1; write('количество гласных букв = ', x); end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Igorevich1559
Yurevna419
subbotinlan
deadnobody
fellybrossme
knyazev527
ИринаАлександровна
cvetprint
shumilovs7252
cipfarm484
kartyshkinaaa
koochma
Глазкова633
Artyukhin545
nat63nesnova5