Тут есть два варианте решения, у Вас в задании написано что число Х и число А уже даны, то бишь с клавиатуры вводить их не надо. Тогда 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.
С
к
а
н
Компьютер
ы р
ш
ь
В клеточку, в линейку, в кружочек(да, такие есть)
Дано:
N=16 символов
l=1/16 Мбайта=64 Кбайта=65536 байт=524288 бит
Найти:
К
Решение:
2i(2 в степени i)=N;=2i=16;i=4 бита
l=k*i; k=l/i=524288/4=131072 символа
Ответ:131072 символа