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

  • Составить программу в ПАСКАЛЕ: Вывести все ПРОСТЫЕ числа в диапазоне от 1 до N, используя циклические конструкции.

Ответы 1

  • Program n1;Uses CRT;VAR n,i,k,j: integer;beginclrscr;writeln('vvedite n');Readln(n);Writeln('Prostye chisla');writeln;For i:=3 to n dobegin For j:=2 to i-1 do If i mod j=0 then k:=k+1;If k=0 then writeln(i); k:=0; end;readlnend.

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

Еще вопросы

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

Войти через Google

 или

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

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

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