var x,y:real; a:integer;
begin
writeln('Введите номер :');
readln(a);
case(a) of
1:
begin
writeln('x = ');
readln(x);
writeln('y = ',sin(x) + Power(x,2));
end;
2:
begin
writeln('x = ');
readln(x);
writeln('y = ',sqrt(cos(x)-2*Power(x,3)));
end;
3:
begin
writeln('x = ');
readln(x);
y := Power(x,2);
writeln('y = ',y);
end;
else
Writeln('Под таким номером формулы нет!');
end;
end.
Я еще приведу пример кода на PascalABC.NET так для сравнение
begin
var a:=ReadInteger('Введите номер: ');
case(a) of
1:
begin
var x:=ReadInteger('x = ');
writeln('y = ',sin(x) + Power(x,2));
end;
2:
begin
var x:=ReadInteger('x = ');
writeln('y = ',sqrt(cos(x)-2*Power(x,3)));
end;
3:
begin
var x:=ReadInteger('x = ');
writeln('y = ',Power(x,2));
end;
else
Writeln('Под таким номером формулы нет!');
end;
end.
1 байт = 8 бит
Переводим биты в байты: 200/8=25 байт в секунду
25*10=250 байт
Формула: =$D$2 + D1
$d$2 - абсолютная адресация, не меняется при копировании ячейки
Вторая часть - относительная адресация и меняется в зависимости от относительной позиции
По горизонтали: 1. Файл. 3. Хранения. 5. Оперативная. 7. Фотография. 8. Бумага. 10. Китай. 11. Пергамент.По вертикали: 1. Фонограф. 2. Береста. 4. Долговременная. 6. Информация. 9. Папирус.
<h3><em>Ответ:Форматирование это типо наведение красоты</em></h3><h3><em>Объяснение:Например изменение цветов столбов и ячеек</em></h3>