Содержание верного ответа и указания по оцениванию
(допускаются иные формулировки ответа, не искажающие его смысла)
Решение для OpenOffice.org Calc и для Microsoft Excel
Задание допускает много решения. Ниже приведено одно из возможных решений.
Подготовительная часть.
В ячейку запишем формулу
информатика
или
информатика
(здесь и далее первая формула используется для русскоязычного интерфейса, вторая – для англоязычного)
В ячейку запишем формулу
информатика
или
информатика
Скопируем эти формулы во все ячейки диапазона
Задание 1.
В ячейку запишем формулу
или
Задание 2.
В ячейку запишем формулу
или
В ячейку запишем формулу
или
В ячейку запишем формулу
Возможны и другие варианты решения.
Например, при выполнении задания можно упорядочить данные так, чтобы нужные строки стояли подряд, а потом подсчитать их количество, используя нумерацию строк.
Если задание выполнено правильно и при выполнении задания использовались файлы, специально подготовленные для проверки выполнения данного задания, то должны получиться следующие ответы.
На первый вопрос:
На второй вопрос:
Поделитесь своими знаниями, ответьте на вопрос:
что тут надо переделать. Program Z2; Var a, b, с:integer; Begin Readln (a, b, c); If a>=b+c then Writeln (‘Нет’) Else if b>=a+с then Writeln (‘Нет’) Else if c>=a+b then Writeln (‘Нет’) Else Writeln (‘Да’);End.
Var a, b, c:integer;
Begin
Readln(a,b,c);
If a>=b+c then Writeln('Нет' )
Else if b>=a+c then Writeln('Нет')
Else if c>=a+b then Writeln('Нет')
Else Writeln('Да');
End.
Использование русских букв в названии переменной (с) это очень сильно, а ещё кавычки не `, а ' должны быть. Код можно еще улучшить избавившись от большого кол-ва проверок if т. к. это замедляет компиляцию
Var a, b, c:integer;
Begin
Readln(a,b,c);
If (a>=b+c) or (b>=a+c) or (c>= a+b) then Writeln('Нет' )
Else Writeln('Да');
End.