<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (b, c) := ReadReal2;
if c <> 0 then Write('a=', b / c)
else Print('с=0')
end.
3 Кбайта = 3072 байт = 24576 бита
их сумма = а)
1Кб=1024байт
1байт=8бит
Код программы для С#. Думаю при желании можно запросто переписать на любой другой язык программирования.
Console.WriteLine("Введите p");
double p = Convert.ToInt16(Console.ReadLine());
Console.WriteLine("Введите q");
double q = Convert.ToInt16(Console.ReadLine());
int c = 0;
double x = 0;
for (double i = p + 1; i < q - 1; i++) { x = i % 10; if (x == 0) c++; }
Console.WriteLine("----------------");
Console.WriteLine("Количество натуральных чисел с последней цифрой 0 на отрезке (p,q) = "+ c); <span>
Console.ReadLine();
При желании могу скинуть уже готовую программу.
</span>
Понятия не имею что за постусловие , но вот лучший вариант
var i:bite;
begin
for i:=3 to 25 do
if i mod 2<>0 then writeln(o);
end.
0.5кбайт=2^(-4)( Два в степени минус четыре)!
1 кбайт=2^1байта.если я правильно понял задание