Какой класс
Объяснение:
ответ: На во ответил правильно, не понял тебе перевод нужен
Объяснение:не знаю ли тебе это:
program test;
uses crt;
var i,right,mark,v: longint;
answer,true1,true2,true3,true4,true5: char;
begin
right:=0; // Счётчик правильных ответов
v:=5; // Количество во Правильный ответ на во Во Вариант ответа');
writeln('b) вариант ответа');
writeln('c) Вариант ответа');
read(answer);
if answer=true1 then inc(right);
end;
if i=2 then begin
writeln('Во Вариант ответа');
writeln('b) Вариант ответа');
writeln('c) Вариант ответа');
read(answer);
if answer=true2 then inc(right);
end;
if i=3 then begin
writeln('Во Вариант ответа');
writeln('b) Вариант ответа');
writeln('c) Вариант ответа');
read(answer);
if answer=true3 then inc(right);
end;
if i=4 then begin
writeln('Во Вариант ответа');
writeln('b) Вариант ответа');
writeln('c) Вариант ответа');
read(answer);
if answer=true4 then inc(right);
end;
if i=5 then begin
writeln('Во Вариант ответа');
writeln('b) Вариант ответа');
writeln('c) Вариант ответа');
read(answer);
if answer=true5 then inc(right);
end;
end;
if right>1 then mark:=right
else mark:=2; // Оценка, если во больше 5, то там другая формула.
writeln('Ваша оценка ',mark,'. Вы дали ',right,' правильных ответов');
