Как разделить семь яблок между 12 мальчиками, если ни одно яблоко нельзя резать более чем на пять частей?

   Решение

Дан массив. Требуется удалить из него элемент, стоящий на месте номер B,
сдвинув все последующие элементы влево.

Входные данные
Во входном файле записано сначала число N - количество элементов массива
(2<=N<=100), затем N чисел из диапазона Integer - элементы массива,
а затем число B (1<=B<=N).

Выходные данные
В выходной файл выведите N-1 число - элементы массива с удаленным B-м элементом.

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

То есть ввод данных осуществляется следующим фрагментом:
read(fi,n);
for i:=1 to n do read(fi,a[i]);
read(fi,b);

А вывод - следующим:
for i:=1 to n-1 do write(fo,a[i],' ');

Необходимые фрагменты вы можете найти в файле P128.PAS

Пример входного файла
5
1 3 5 6 7
2

Пример выходного файла
1 5 6 7

Текст программы P128.PAS

const nmax=100;

var a:array[1..nmax] of integer;
    n:integer;
    i:integer;
    b:integer;
    fi,fo:text;

begin
assign(fi,'input.txt');
reset(fi);
assign(fo,'output.txt');
rewrite(fo);

read(fi,n);
for i:=1 to n do read(fi,a[i]);
read(fi,b);

{Вы должны писать здесь}

for i:=1 to n-1 do write(fo,a[i],' ');
close(fi);
close(fo);
end.

   Решение

Решите уравнение

(x² + x)² + = 0.

   Решение

Существует ли такое трехзначное число , что является квадратом натурального числа?

   Решение

Страница: << 15 16 17 18 19 20 21 >> [Всего задач: 602]      

Докажите, что любое натуральное число сравнимо с суммой своих цифр по модулю
  а) 3;   б) 9.

Прислать комментарий

Решение

Сумма двух цифр a и b делится на 7. Докажите, что число  aba  также делится на 7.

Прислать комментарий

Решение

Существует ли такое трехзначное число , что является квадратом натурального числа?

Прислать комментарий

Решение

Найдите наименьшее число, записываемое одними единицами, делящееся на (в записи 100 троек).

Прислать комментарий

Решение

Найдите все натуральные числа, которые увеличиваются в 9 раз, если между цифрой единиц и цифрой десятков вставить ноль.

Прислать комментарий

Решение

Страница: << 15 16 17 18 19 20 21 >> [Всего задач: 602]