1 символ = 8 бит = 1 байт
150*40*60=360000 (символов/байт)
это ответ и есть, но можно для удобства перевести в килобайты
1 килобайт = 1024 байт
360000/1024=351,5625
Ответ: 360000 байт или 351,5625 килобайт
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var x:=ReadReal; var y:=x*x+11; Writeln(y)
end.
Блок схема составленная из Pascal программы прогоненная в FCEditor
Введем обозначение. Все, относящееся к прямоугольникам первого вида будет иметь индекс 1, ворого вида - индекс 2.
Пусть имеется n₁ и n₂ прямоугольников. По условию n₁+n₂ = w₁ и n₁=n₂, откуда n₁=w₁ и n₂=w₁
Площади: S₁=w₁×h₁, S₂=w₂×h₂
Общая площадь S = n₁×w₁×h₁ + n₁×w₂×h₂ = w₁×(w₁×h₁ + w₂×h₂)
<em>// PascalABC.NET 3.2, сборка 1345 от 24.11.2016</em>
<em>// Внимание! Если программа не работает, обновите её версию!</em>
begin
var h1,w1,h2,w2:real;
Read(h1,w1,h2,w2);
Writeln(w1*(w1*h1+w2*h2))
end.
<u>Пример</u>
1 2 3 4
28
Var x,y:real;
begin
write('x, y: ');
readln(x,y);
if (y<=0)and(y>=1.5*x-6)and(y>=-1.5*x-6)
then writeln('Да') else writeln('Нет');
end.
Пример:
x, y: 1 -2
Да