Регистрация
czar15
27.05.2022 20:19
Информатика
Есть ответ 👍

Написать программу проверки знания россии(3 вопроса)

232
405
Посмотреть ответы 2

Ответы на вопрос:

lenalime
lenalime
4,6(23 оценок)
Var    question :   array [1..3] of string;   awns,mark: integer;   begin      writeln('вопрос 1'+ #10 +'1 - вариант ответа'+ #10 +'2 - вариант ответа'+ #10 +'3 - вариант ответа');       readln(awns);       // проверяем ответ    if awns = 1 then mark : = mark + 1;       writeln('вопрос 2'+ #10 +'1 - вариант ответа'+ #10 +'2 - вариант ответа'+ #10 +'3 - вариант ответа');       readln(awns);       // проверяем ответ      if awns = 2 then mark : = mark + 1;       writeln('вопрос 3'+ #10 +'1 - вариант ответа'+ #10 +'2 - вариант ответа'+ #10 +'3 - вариант ответа');       readln(awns);       // проверяем ответ      if awns = 3 then mark : = mark + 1;     // выводим результат      writeln(' вы ответили на ' + mark + ' вопросов из 3');   end.
EMPITINES
EMPITINES
4,6(96 оценок)
Пр 45 повтори 4 [ вп 40 пр 90 ] лв 45 ; можешь менять значение после "вп" на своё

Популярно: Информатика