Var
i,s,t,koldney:integer;
begin
writeln('введите количество дней');
readln(koldney);
for i:=1 to koldney do
begin
writeln('введите температуру в ', i, ' день');
readln(t);
if t<0 then
s:=s+1;
end;
writeln('количество дней с температурой ниже 0 = ', s);
readln;
end.
1* 1 = 1
11 * 11 = 121
111 * 111 = 12321
1111 * 1111 = 1234321
11111 * 11111 = 123454321
то есть в произведении сначала цифры от 1..N, а потом обратно до 1, где N - количество цифр в множителях
Конец действия, ставится в конце оператора, функции и т.д.
Надеюсь помог)
Так, как тест приведен в вопросе, он содержит 59 символов.
Тогда его информационный объем составит 16×59 = 944 бита или
944/8 = 118 байт.
Поскольку такого ответа нет, скорее всего потерялся один пробел, т.е. символов 60 и они займут 60×16 =<u> 960 бит</u>
Это значит что где-то пропущен пиксель или группа пикселей, через которые проходит цвет на область. Используйте Лупу и подрисуйте недостающие пиксели