S = 5
-------
`a` равен 22
`s` = 6
Если `a` меньше 20 тогда надо увеличить `s`
Eсли `a` больше 20 тогда надо уменьшить `s`
Вопрос `a` меньше или больше 20?
..........................
Var
C:char;
Begin
For C:='0' to '9' do
if Ord(C) mod 3 = 0 then
WriteLn(C)
End.
Нееет, ты что!!! Вирусы только в электронных устройствах! но есть такая болезнь не помню как называется..
1. в) Умножаем все числа и переводим в килобайты
2. а) Считаем количество символов и умножаем на 16
3. б) Умножаем все числа и переводим в килобайты