
Реши орфографические и пунктуационные задачи. Выпиши союз, определи, что связывают союзы (однородные члены предложения / части сложносочинённого предложения / части сложноподчинённого предложения).
Пример:
«Прилетели птицы, и всё запело, заворковало».
Союз и связывает части сложносочинённого предложения.
1. Он наш_л рак_вину на дне моря однако сб_реч? её (не)сумел.
Союз
связывает .
2. Анна (не)отвечала однако я её (не)тор_пил.
Союз
связывает.
3. ...лёгкую г_рмонию Растрелли он понял как другие (не)умели.
Союз
связывает
var
n, max, count, contrl, max2: integer;
begin
contrl := 0;
max := 0;
Writeln('Введите числа: ');
Readln(n);
while n <> 0 do
begin
Inc(count);
if n>max then begin max2:=max; max:=n end
else if n > max2 then max2 := n;
Read(n);
end;
max2*=max;
Writeln('Введите контрольное значение: ');
Read(contrl);
Writeln('Получено: ', count, ' чисел');
Writeln('Получено контрольное значение: ', contrl);
Writeln('Вычисленное контрольное значение:: ', max2);
if contrl = max then Writeln('Контроль пройден')
else Writeln('Контроль не пройден');
end.