Если правильно понял задание. На будущее, желательно указывать в чем работаете.
а) 5
б) 4
в) 40
г) 1
Program pr1;
var
x:byte; // Число
y:real; // Функци
Begin
x:=17;
writeln('y= ',SQRT(x+8));
End.
Дальше просто замени другими значениями x
Тут есть два варианте решения, у Вас в задании написано что число Х и число А уже даны, то бишь с клавиатуры вводить их не надо. Тогда 1 вариант решения 1. и 2. задания:
1)
var x: integer;
begin
x:=5; // Поменяйте значение на нужное
writeln ('Квадрат числа ', x, ' = ',sqr(x));
end.
2)
var a,b: integer;
begin
a:=3; // Поменяйте значение на нужное
b:=a*2;
writeln ('Сумма A и B = ', a+b);
end.
2 вариант решения, все значения вводятся с клавиатуры:
1)
var x: integer;
begin
write ('Введите число Х: '); read(x);
writeln ('Квадрат числа ', x, ' = ',sqr(x));
end.
2)
var a,b: integer;
begin
write ('Введите число А: '); read (a);
b:=a*2;
writeln ('Сумма A и B = ', a+b);
end.
var
I,U,R: real;
begin
write('Введите значение напряжения (U, В) = '); readln(U);
write('Введите значение сопротивления (R, Ом) = '); readln(R);
I:=U/R;
write('Сила тока (I, A) = ', I);
end.
Информационный объем текста с учетом избыточности составит
100 Кб × (1+25/100) = 125 Кб
Переведем этот объем в килобиты.
1 Кб = 1024 б = 1024×8 бит = 8192 бита;
125 Кб = 125 × 8192 = 1 024 000 бит
Определим время передачи.
За 1 с передается 10 кбит, т.е. 10 000 бит.
Тогда время передачи составит 1 024 000 / 10 000 = 102.4 с
Так задача должна решаться, если использованы единицы измерения информации по ГОСТ (1 Кбайт = 1024 байта, 1 кбит = 1000 бит). Обратите внимание, что у Кбайт буква "К" заглавная, что указывает на её внесистемность относительно системы СИ. Исторически пропускная способность каналов передачи данных измеряется в битах/с, причем с использованием системных приставок единиц измерения (к - кило, 10³, м - мега, 10⁶ и .т.д.).
Но тут в условии почему-то использована заглавная буква "К" и при указании скорости передачи, а по ГОСТ это означает множитель 2¹⁰ = 1024.
Если придраться к этой записи, то мы имеем право написать, что 10 Кбит/с это 10 240 бит/с, а не 10 000 бит/с и в ответе получим ровно 100с.
Выбор за автором вопроса.