Информатика | 10 - 11 классы
ПОМОГИТЕ ПОЖАЛУЙСТА!
ОЧЕНЬ НУЖНО!
Дано простое число.
Найти следующее за ним простое число.
Программа Паскаль.
Паскаль Составить программу для проверки, можно ли заданное натуральное число N представить в виде куба простого числа?
Паскаль Составить программу для проверки, можно ли заданное натуральное число N представить в виде куба простого числа.
Напишите программу определения простого числа в Паскале?
Напишите программу определения простого числа в Паскале.
Помогите, пожайлуста, составить программу на паскале?
Помогите, пожайлуста, составить программу на паскале.
Вывести на экран все простые числа в диапазоне от 2 до N.
Дано натуральное число N?
Дано натуральное число N.
Определить, является ли оно простым .
Составить программу на языке программирования Паскаль : Подсчитать колтчество букв "а" в заданном тексте.
Пожалуйста очень надо .
ПОМОГИТЕ ПОЖАЛУЙСТА?
ПОМОГИТЕ ПОЖАЛУЙСТА!
Даны 2 числа.
Найти их сумму, если числа равны, и найти их произведение, если числа не равны.
Написать блок схему и составить программу на Паскаль.
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа?
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа!
Дано трёхзначное число?
Дано трёхзначное число.
Найти среди цифр этого числа, максимальное.
Программа в Паскале.
Дано число?
Дано число.
Определить является ли оно простым.
Программа на паскале.
Напишите через while ИЛИ repeat.
Заранее спасибо).
Написать простую программу(паскаль)?
Написать простую программу(паскаль).
Дано три числа a, b, c .
Найти среди них минимальное.
Составить программу, печатающую все простые числа, не превосходящие данного числа?
Составить программу, печатающую все простые числа, не превосходящие данного числа.
Паскаль абс.
На этой странице сайта размещен вопрос ПОМОГИТЕ ПОЖАЛУЙСТА? из категории Информатика с правильным ответом на него. Уровень сложности вопроса соответствует знаниям учеников 10 - 11 классов. Здесь же находятся ответы по заданному поиску, которые вы найдете с помощью автоматической системы. Одновременно с ответом на ваш вопрос показаны другие, похожие варианты по заданной теме. На этой странице можно обсудить все варианты ответов с другими пользователями сайта и получить от них наиболее полную подсказку.
Var
a, i, b : integer ;
begin
readln(a) ;
while (b> ; 0) begin for i : = 2 to a begin if ((a mod i) = 0) then b : = b + 1 ; end ; a : = a + 1 ; end ;
writeln(a) ;
end.