вопросник45

11.12.2022 07:37

Информатика

Есть ответ 👍

Впоселке функционируют три средние школы №1, №2 и №3. администрация поселка выделила по k дачных участков для каждой школы. участки расположены в ряд вдоль автотрассы и нумерованы от 1 до n (n = 3k). учителя школы №1 уже выбрали себе участки, теперь предстоит распределить участки между учителями школы №2 таким образом, чтобы выбранные k участков имели наименьшую протяженность. (выбирать участки подряд мешает выбор, сделанный учителями школы №1) мерой протяженности для выбранных участков является число участков, находящихся между крайними участками (из выбранных участков). например, если выбраны пять участков с номерами 3, 4, 8, 12, 14, то протяженность этих участков равна 14 – 3 – 1 = 10. требуется написать программу, которая сделала бы правильный выбор участков для учителей школы №2. входные данные: входной файл состоит двух строк; в первой - одно натуральное число: k – число участков, выделенных для каждой школы; 1  k  999999. во второй строке - номера участков, выделенных для учителей школы №1. выходные данные: выходной файл состоит из k 4 натуральных чисел – номеров участков для учителей школы №2. формат ввода 6 1 4 7 12 15 17 формат вывода 8 9 10 11 13 14

193

434

Посмотреть ответы 2

Ответы на вопрос:

ayazhanbeibit51

Информатика

4,8(14 оценок)

степень

program jopascal;

var

i, a: longint;

u, j,

n, m : longint;

function fdiv (a, left : longint) : longint;

var

i : longint;

begin

d : = 1;

for i : = left to trunc (sqrt (a)) do

if (a mod i = 0)

then

begin

d : = i;

break;

end;

if (d < > 1)

then

fdiv : = d

else

fdiv : = a;

end;

function g (n, u : longint) : longint;

var

i : longint;

begin

i : = 0;

while (n mod u = 0)

begin

inc (i);

n : = n div u;

end;

g : = i;

end;

begin

assign (input, 'input.txt');

assign (output, 'output.txt');

reset (input);

read (a);

close (input);

m : = 0;

n : = 1;

i : = fdiv (a, 2);

u : = 2;

while (a > 1)

begin

n : = n * i;

j : = 0;

while (a mod i = 0)

begin

inc (j);

a : = a div i;

end;

if (j > m)

then

begin

m : = j;

u : = i;

end;

i : = fdiv (a, i + 2);

end;

x : = 1;

while (g (n * x, u) * n * x < m)

inc (x);

n : = n * x;

rewrite (output);

write (n);

close (output);

end.

danilklimenko2

Информатика

4,8(60 оценок)

Как называется программа?

ответ: cup_of_tea

Запишите какой тип переменных используется в программе.

ответ: real

Запишите названия используемых переменных.

ответ: a, b, c, y , x

В какой строке программа получает данные от пользователя? Напишите номер строки

ответ: 5) readln(a,b,c);

Что будет выведено на экран, если пользователь введет значения: 6, 9, 3

ответ: 1.8

Объяснение:

Вы ввели неверный код, это может быть:

program cup_of_tea;

var a, b, c, y , x: real;

begin

, введите три числа');

readln(a,b,c);

y:=a;

if b>y then y:=b;

if c>y then y:=c;

if (a>b) or (a>c) then x:=a;

if (b>a) or (b>c) then x:=b;

if (c>a) or (c>b) then x:=c;

writeln (y+x);

end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.