Решение на паскале.
Объяснение:
Первая задача:
var summa, kolichestvo : integer;
begin
summa := 2;
while summa <= 100 do
begin
summa := summa + 8;
kolichestvo := kolichestvo + 1;
end;
writeln('Количество = ', kolichestvo);
end.
Вторая задача:
var a : array[1..20] of integer;
kolpol, sumot, i : integer;
begin
for i:=1 to 20 do
Read(a[i]);
for i := 1 to 20 do
if a[i] >= 0 then
kolpol := kolpol +1
else
sumot := sumot + a[i];
writeln('Количество положительных = ', kolpol);
writeln('Сумма отрицательных = ', sumot);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Определение форматирование, редактирование, кегль, гарнитура текста, моноширный и пропорциональный шрифт. в каких единицах измеряются размер шрифта. по информатике
форматирование--это когда пользовыватель удаляет все не нужные файлы, без их восстановления.
гарнитура текста-- это набор из одного или нескольких шрифтов в одном или нескольких размерах и начертаниях, у слоао гарнитура есть определение шрифт.
размер шрифта--измеряется в пунктах
в странах снг 1 пункт = 0,3759 мм. в сша (используется при компьютерном наборе) 1 пункт = 1/72 дюйма = 0,3528 мм = 352,777 773 956 019 микрон. 1 пункт = 1/12 цицеро (pica) = 1/48 квадрата
редактированте--это когда что либо в пордок дополнить недостатки.
моноширинный, или непропорциональный шрифт — этошрифт все знаки которого имеют одинаковую ширину. этим он отличаетсся от пропорционального шрифта, в котором отличаются по ширине друг от друга.