6папок т.к в 1 папке содержится 2-3 бита
5 бит.
Фальшивых монет может быть от 0 до 16 - всего 17 вариантов. 4 бит недостаточно, т.к. 2^4 = 16 < 17; а 5 бит хватит: 2^5 = 32 > 17
Быквы и цыфры
Знаки операций
Символы
Ограничители и разделители
Специальные символы
Program Z1;
Var x,y:real;
begin
Write('Введите значение x = ');
Readln(x);
if x>=1 then y:=5*x else y:=sqr(x);
Write('y=',y);
End.
Пример:
Введите значение x = 3
y=15
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var x:=ReadReal('x=');
var s:=0.0;
for var i:=1 to ReadInteger('n=') do s+=sin(i*x);
Writeln('s=',s)
end.
<u><em>Тестовое решение</em></u>
x= 0.543
n= 15
s=2.79048740821036