Решение олимпиадных задач по информатике

<<- Назад к вопросам

Простое число - это…

(Ответ считается верным, если отмечены все правильные варианты ответов.)

Варианты ответа

целое число, сумма делителей которого нулевая

целое число, у которого нет делителей

целое число, делители которого не превышают половины от этого числа

целое число, у которого ровно два делителя(Верный ответ)

целое число, большее единицы и у которого нет делителей, кроме единицы и самого себя(Верный ответ)

Похожие вопросы

Фрагмент программы на Паскале проверяет - простое ли число n, введенное с клавиатуры, он не правильный. Укажите возможные правильные варианты.

…...k:=0;for i:=1 to n-1 do if n mod i=0 then k:=k+1;if k=2 then writeln ('число простое')else writeln ('число составное');…

Укажите, какой фрагмент программы на Паскале проверяет - простое ли число

, введенное с клавиатуры:

Фрагмент программы на Паскале проверяет - совершенное ли число n, введенное с клавиатуры. Выберите все варианты, которые помогут исправить в нем ошибку:

…for i:=1 to n do if n mod i=0 then k:=k+i;if k=n then writeln ('число совершенное')else writeln ('число несовершенное');…

В переменную n с клавиатуры вводится значение n=137. Предскажите результат работы программы (что выведется на экран):

…k:=0;for i:=2 to n-1 do if n mod i=0 then k:=k+1;if k=2 then writeln ('простое')else writeln ('составное');…

Совершенное число - это…

Укажите, какой фрагмент программы на Паскале проверяет - совершенное ли число n, введенное с клавиатуры:

Решение задачи: "Необходимо представить число 40 в виде суммы неповторяющихся слагаемых (одинаковые по значению, противоположные по знаку слагаемые считаются разными" возможно методом:

Что делает приведенная ниже программа на Паскале:

var a: string;b, i, j, st, n, s, x, k: integer;beginwriteln ('введите число'); readln (a); n:=length(a); s:=0; for i:=1 to n do  begin  val (copy(a,n-i+1,1),x,k); st:=1;  for j:=1 to n do st:=st*x;  s:=s+st;  end; val (a, x, k); if s=x then writeln ('+') else writeln ('-');end.

Приведенная программа на Паскале реализует алгоритм поразрядного умножения числа на число от 0 до 9, вводимых с клавиатуры приведена с ошибкой. Найдите ее.

const 	m=…;var a, rez: array [1..m] of byte; i, n, x, k: integer; stroka: string;begin readln (stroka); readln (x); n:= length (stroka); for i:=1 to n do val (copy(stroka, i, 1), a[i], k); for i:=1 to n do rez[i]:= a[i] * x; for i:=n downto 2 do  begin  rez[i-1]:= rez[i-1]+rez[i] mod 10;  rez[i]:= rez[i] div 10;  end for i:=1 to n do write (rez[i]);end.