Задать вопрос Регистрация
Помочь другим

  • дано натуральное число N. Определить, является ли оно простым .

    Составить программу на языке программирования Паскаль: Подсчитать колтчество букв "а" в заданном тексте.

    пожалуйста очень надо .

Ответы 1

  • var n,i:integer;

    Begin

      read(n);

      for i:= 2 to n-1 do

        if n mod i = 0 then writeln('No');

    End.

     

    var n,i:integer;

    s:string;

    Begin

      read(s);

      for i:= 1 to length(s) do

        if s[i]="a" then n:=n+1;

      writeln(n);

    End.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years