3. Напишите в тетради тему урока и дайте названия назначения инструментов.
4.ПОМГИТЕ

Question

Информатика: 3. Напишите в тетради тему урока и дайте названия назначения инструментов. 4.ПОМГИТЕ ​

Соря11 · Accepted Answer

Const
  problems : array [0..9] of String = ('x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10','x1+5=10', 'x1+5=10', 'x1+5=10');
  answers : array [0..9] of String = ('-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5');
var
  countOfAnswers, counter: integer;
  userAnswer: String;
begin
  countOfAnswers := 0;
  for counter:=0 to 9 do
  begin
  write('Введите ответ уравнения ', problems[counter], ' : ');
  readln(userAnswer);
  if userAnswer = answers[counter] then Inc(countOfAnswers);
  end;
if countOfAnswers > 8 then writeln('Отлично')
else if countOfAnswers > 5 then writeln('Хорошо')
else writeln('Плохо');
end.

3. Напишите в тетради тему урока и дайте названия назначения инструментов.4.ПОМГИТЕ ​

MOGZ ответил

3. Напишите в тетради тему урока и дайте названия назначения инструментов.
4.ПОМГИТЕ