Кто хорошо знает программу ПАСКАЛЬ??плиз помогите)

Доброго времени суток.

Я бы сначала объявил тип

type
TQuestion = record
Q : String; {текст вопроса}
A : array[1..4] of String; {массив вариантов ответа}
R : Word; {номер правильного ответа}
end;

Затем можно объявить типизированную константу с одновременной инициализацией полей

Questions : array[1..10] of TQuestion = (
(Q : 'Это первый вопрос';
A : ('Ответ 1','Ответ 2','Ответ 3','Ответ 4');
Q : 2),
(Q : 'Это второй вопрос';
A : ('Ответ 1','Ответ 2','Ответ 3','Ответ 4');
Q : 1),
{и так еще 8 раз}
);

Ну а дальше в цикле выводите вопрос и варианты ответов к нему и предлагаете пользователю ввести номер ответа Проверяете его и обабатываете.

N := 0; {число правильных ответов}
for i:=1 to 10 do begin
ClrScr;
WriteLn(Questions[ i ].Q);
for j:=1 to 4 do WriteLn(j, '. ', Questions[ i ].A[ j ]);
Write('Введите номер правильного ответа : ');
ReadLn(Answer);
if Answer = Questions[ i ].R then Inc(N); ответ правильный, делаете что надо
end;

А здесь можно в зависимости от количества правильных ответов поставить оценку.

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

Удачи!

А с чем именно то помочь? С вопросами? С алгоритмом? С синтаксисом? Или тебе что-то конкретно непонятно?
Или тебе надо всё придумать и написать и выложить на блюдечке с голубой коемочкой?

У меня есть программа собственного составления. там в общем сам вопрс ы составляешь и тестируешь кого-нидь... .
Так что если нужно, то скину

в чём тесты писать? В паскале? В ворде или ещё где-то?