ОбъясОтличник
program prog;
uses crt;
var a,b,v:integer;
begin
clrscr;
write('Возраст Антона = ');
readln(a);
write('Возраст Бориса = ');
readln(b);
write('Возраст Виктора = ');
readln(v);
writeln;
if (a>b)and(a>v) then writeln('Антон старше всех.');
if (b>a)and(b>v) then writeln('Борис старше всех.');
if (v>a)and(v>b) then writeln('Виктор старше всех.');
if (a=b)and(a>v) then writeln('Антон и Борис старше Виктора');
if (a=v)and(a>b) then writeln('Антон и Виктор старше Бориса');
if (b=v)and(b>a) then writeln('Борис и Виктор старше Антона');
if (a=b)and(a=v) then writeln('Антон,Борис и Виктор одного возраста');
end.
Подробнее - на -
Содержание верного ответа и указания по оцениванию
(допускаются иные формулировки ответа, не искажающие его смысла)
Решение для OpenOffice.org Calc и для Microsoft Excel
Задание допускает много решения. Ниже приведено одно из возможных решений.
Подготовительная часть.
В ячейку запишем формулу
информатика
или
информатика
(здесь и далее первая формула используется для русскоязычного интерфейса, вторая – для англоязычного)
В ячейку запишем формулу
информатика
или
информатика
Скопируем эти формулы во все ячейки диапазона
Задание 1.
В ячейку запишем формулу
или
Задание 2.
В ячейку запишем формулу
или
В ячейку запишем формулу
или
В ячейку запишем формулу
Возможны и другие варианты решения.
Например, при выполнении задания можно упорядочить данные так, чтобы нужные строки стояли подряд, а потом подсчитать их количество, используя нумерацию строк.
Если задание выполнено правильно и при выполнении задания использовались файлы, специально подготовленные для проверки выполнения данного задания, то должны получиться следующие ответы.
На первый вопрос:
На второй вопрос:
Поделитесь своими знаниями, ответьте на вопрос:
Сколько байтов в слове компьютерный.
12
Объяснение:
Каждую букву можно закодировать одним байтом