Jessicacoen
01.01.2020 16:36

1. Составить программу разложения натурального числа n на простые множители. Пример: 360 = 2 2 2 3 3 5. Решить задачу необходимо через цикл While и построить блок схему. 2. написать программу определения максимального числа последовательности положительных чисел. Решить задачу необходимо через «Любой Цикл» и построить блок схему.
3. Начав тренировки, спортсмен в первый день пробежал 10 км . Каждый день он увеличивал дневную норму на 10% от нормы предыдущего дня. Определить, какой суммарный путь пробежит спортсмен за 5 дней. Решить задачу необходимо через For и построить блок схему.

4. Для вещественных чисел z,x,y вычислить (x+y+x ) и (x*y*x ), определить что будет больше произведение или сложение .Решить задачу необходимо через if и построить блок схему.
5. По последней цифре заданного числа определить последнюю цифру куба этого числа.Решить задачу необходимо через Оператор выбора и построить блок схему.
Через Python

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
алина3759
07.03.2023 02:14

Пользователь знает ключ, или

пароль, который известен только ему. К этой группе можно отнести и идентификацию через смс-уведомления. При вводе имени и пароля пользователя сервер сравнивает введенные данные

с сохраненными данными. В случае полной идентичности введенных данных появляется возможность войти в систему.

Различают два вида паролей – динамические

и постоянные. Постоянные пароли изменяются

только по требованию пользователя, а динамические пароли изменяются по определенным параметрам. Например, если пользователь забудет

пароль, сервер может предложить ему динамический пароль для входа в систему.

Объяснение:

0,0(0 оценок)
Ответ:
morugadenys
26.11.2022 04:31

1)

var a,b,x,y:longint;

begin

write("Vvedite nachalo i konec otrezka: ");

read(a,b);

write("Vvedite x: ");

read(x);

y:=sqr(x)*x;

if (y>a)and(y<b) then write("Na dannom otrezke znachenie funkcii ravno ",y) else write("Na dannom otrezke net reshenii");

readln

end.

2)

var c,i:byte;

begin

for i:=49 to 215 do

if (i mod 4=0) then c:=c+1;

write("Kolichestvo chisel, kratnyh 4 na zadannom promezhutke ravno ",c);

readln

end.

3)

var i:integer;

p:longint;

for i:=1000 to 9999 do

if (i mod 10=3) then p:=p*i;

write("Proizvedenie chetyrehznachnyh chisel, okanchivaushihsya na 3 ravno ",p);

readln

end.

4)

var i:byte;

c:integer;

begin

for i:=221 to 778 do

if ((i mod 10)=(i div 100)) then c:=c+1;

write("Kolichestvo chisel ravno ",c);

readln

end.

5)

var i:longint;

c:integer;

begin

for i:=10000 to 99999 do

if ((i mod 10)=(i div 10000))and(((i mod 100)div 10)=((i div 1000)mod 10)) then c:=c+1;

write("Kolichestvo chisel ravno ",c);

readln

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота