ПОМОГИТЕ ПЛИЗ!

integer;

Begin

Y:=0;

For x:=1 to 9 do

Y:=y+1;

Writeln (‘y = ’,y);

End.

2) Var

Y, x: integer;

Begin

Y:=0;

X:=10;

While x>0 do

Begin

X:= x-2;

Y:= y+x;

End;

Writeln (‘y = ’,y)

End.

begin

F:=F*k;

S:=S*(2*F)/(k*k*k*k+k);

writeln('k = ',k );

readkey;

end.

Найдите ошибку, пожалуйста, программа не идет.

мышки для сбора урожая ИСХОДНЫЕ ДАННЫЕ ______________________ 2)Малыш и карлосон решили по-братски разделить два сладких орешка-болльшой и маленький . Как это сделать ? Помогите плиз , заранее спасибо :) надеюсь на вас ! Просто я непоняла что с исходными данными делать .

Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 и находит количество элементов с четными значениями.
Прошу помогите

Помогите плиз

Трем логикам предоставили следующий список слов:

ОДА ПАЛ СОР НОС ВАР

* Каждому из логиков назвали только по одной букве, при этом каждый знал только свою букву.
* Логикам сказали, что их три буквы складываются в слово из приведенного списка.
* Когда каждого логика спросили по очереди: «Знаете ли вы какое слово складывается из названных вам букв?», сначала первый ответил «ДА», затем второй ответил «ДА» и потом третий ответил «ДА».
* Каждый из логиков слышал ответ каждого другого.

Какое слово складывается из букв, названных логикам?

пилить двухметровые бревна пете с костей полуметровые а васе с алёшей трёхметровые каждое бревно следовало распилить на полуметровые поленья в стенгазете отметили что бригадир ловров с рожковым напили 26 бригадир галкин с камковым 27 а бригадир козлов с евдокимовым 28 поленьев . Как зовут Камкова??


Помогите плиз!! прошу