умоляю помогите!!!!!!!!!!информатикп

ВОПРОСЫ.

Если нужно вот таже программа с поиощью repeat-until (она точно написана верно):

program E10;

var i,n: integer;

s: real;

begin

writeln('vvedite n');

readln(n);

i:=1;

s:=1;

repeat i:=i+1;

s:=i*2*s;

until

i=n;

writeln('s=', s:4:2);

readln;

end.

я в 9 классе можно по простому заранее спасибо
Мне нужно с помощью описания
переменных в Pascal ABC изобразить
вот этот рисунок:

основанием 3

1)Составить программу вывода на экран одномерного массива из пяти чисел,заполненного с клавиатуры

2)Составить программу вывода на экран одномерного массива из пяти чисел(числа в интервале от 0 до 100),заполненного случайным образом

3)найти минимальный элемент массива использованный случайным образом

Помогите пожалуйста.....

Яблочковой не нравилось, что каждый раз учительница называет её фамилию последней. Когда учительница узнала об этом, она сказала: "Марина, если ты составишь свой список учеников, я буду пользоваться им." Помогите Марине отсортировать список так, чтобы её фамилия оказалась первой. Восстановите список учительницы.

Марина Яблочкова

Катя Арбузова

Валя Стрелкина

Роберт Щукин

Коля Белкин

Лена Волкова

Дима Иволгин

Серёжа Тополев

Яша Арбузов

У меня такое дело: я перекачивала фотографии с телефона на компьютер. Я как всегда открыла папку от куда перекачивать надо и стала копировать нечаянно убрала руку и получилось так что фотки стали копироваться автоматически в эту же папку. я быстро нажала на крестик и оно перестало копировать, я все выделенные фотографии удалила, а вместе с ними удалились все фотографии которые я выделяла. я быстро выдернула из телефона юизби шнур и все закрылось. опять открыла папку а там пусто посмотрела в корзину тоже пусто где мне можно найти эти фотографии. они мне очень дороги умоляю помогите. У меня ноутбуке стоит виндоувс 8 , а телефон експлей атом.

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!ПОМОГИТЕ ПОЖАЛУЙСТА !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Задали написать программу на язвке паскаль:вычислить и вывести на экран 8 первых элементов ряда если каждый элемент задан формулой а1= i/sin*i