Дано предложение. в нем слова разделены одним пробелом (начальные и ко нечные пробелы и символ "- в предложении отсутствуют определить коли чество слов в предложении.

{ ответ дан на языке Pascal }
PROGRAM Solution(INPUT, OUTPUT);

VAR
  Str: STRING;
  I: INTEGER;
  Count: INTEGER;

BEGIN
  Count := 0;
  WRITE('Введите строку: ');
  READLN(Str);
  FOR I := 1 TO LENGTH(STR)
  DO
  BEGIN
    IF STR[I] = ' '
    THEN Count := Count + 1;
  END;

  WRITELN(Count + 1);

END.

Электронды пошта (electronic mail, e-mail) – Интернет желісінде ең атақты қолдану. Бұл бөлімде Интернетте қолданылатын электронды поштаның негізгі хаттамасы туралы толық жазылған.

Электронды пошта ең басында қолдан жасалған пошталық жүйе түрінде болды.  Сауда түрі, мысалы IBM компаниясымен PROFS (Professional Office System), бірінші тек қана мэйнфреймдар мен шағын-ЭЕМ үшін өңделді.

Бірақ жергілікті желілердің пайда болуы электронды поштаның сауда өнімінің дамуына әкелді. Бұл жүзеге асыру таныс жетіспеушілік –стандартты хаттамаларды толық емес қолдау. Пошталық сервер сапасында файлдық сервер алға шығып, кейде «хабарды сақтау орны» деп атайды. Файлдық серверде сақталатын, файлға ақпаратты жазып, персоналды компьютерлер жергілікті бір желі электронды поштамен айырбасталды. Соңғысы, өз кезегімен әртүрлі операциондық жүйемен файлдарды біріктіру қолдануын қамтамасыз етеді, мысалы Microsoft LAN Manager және Novell NetWare.

Хабарламаның сапар желіктеуіші бір сақтаудан екіншіге өтуі жеке хаттамалардың немесе версия арқылы стандартқа толық сай емес орындалады. Екі хабарламаны сақтау бір жергілікті желіде бар болуы мүмкін, және жалпы желі арқылы немесе телефон байланыс көмегімен байланысады. Жергілікті желі үшін Электрондық поштаның жүйесіне Microsoft Mail и Lotus cc:Mail жатады. Жергілікті желі үшін электронды пошта бөлім деңгейінде өте жақсы жұмыс істейді. Бұндай жүйелер нашар масштабталған, кейде бірнеше пошталық серверді (бөлімге бірден немесе одан көп бойынша) біріктіру кезінде біраз администраторлық қиындықтар пайда болады.

k = 0

for i in range(1,11):

   if i == 1:

       ds = int(input('Сколько будет 2+2? '))

       if ds == 4:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 2:

       dk = int(input('Сколько сторон у треугольника? '))

       if dk == 4:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 3:

       dk = int(input('Сколько сторон у квадрата? '))

       if dk == 4:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 4:

       dk = int(input('Стороны прямоугольника 5 и 4, чему равен периметр?  '))

       if dk == 20:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 5:

       dk = int(input('6 * 6 это? '))

       if dk == 36:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 6:

       dk = int(input('Корень из 144? '))

       if dk == 12:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 7:

       dk = int(input('У Петя 2 конфеты, у Саши 3, сколько всего конфет? '))

       if dk == 5:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 8:

       dk = int(input('25 + 25? '))

       if dk == 50:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 9:

       dk = int(input('У Маши 5 яблок, у Миши 3, сколько всего яблок? '))

       if dk == 8:

           print('Молодец')

           k+=1

       else:

           print('Не верно')

   if i == 10:

       dk = str(input('Чьи штаны на все стороны равны?'))

       if dk == 'Пифагоровы':

           print('Молодец')

           k+=1

       else:

           print('Не верно')

print('Ваш равен ' + str(k))