//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var k:real;
var b:real;
repeat
k := ReadReal('Введите k');
b := ReadReal('Введите b');
until k <> 0;
var x := -2;
while x <= 2 do
begin
print(k * x + b);
x := x + 2;
end;
end.
Там где цифры,это и есть кегль
Ответ:
50 байтов=400бит
Объяснение:
потому что там 48 букв и ,'! в итоге 50
158 - Обычная программа
Добавляем считывание чисел:
145768
Добавляем суммирование и выводим результат :
14576238 - Ответ