Номер 11-B
номер 1-C
номер 2 -B
номер 3 -D
номер 4 -B
номер 5 -3
Var
a,b,c:integer;
x,y,z:string;
begin
writeln('Введите стороны треугольника');
readln(a,b,c);
x:='равнобедренный';
y:='равносторонний';
z:='разносторонний';
begin
if (c=b) and (a<>c) then
writeln('Треугольник',' ',x);
if (a=c) and (a<>b) then
writeln('Треугольник',' ',x);
if (a=b) and (a<>c) then
writeln('Треугольник',' ',x);
if (a=b) and (a=c) and (b=c) then
writeln('Треугольник',' ',y);
if (a<>b) and (a<>c) and (b<>c) then
writeln('Треугольник',' ',z);
end;
readln
<span>end.</span>
Тут главные слова это поднимался и опускался.То есть по сути он выходил и входил
Действуем в виде исключения
Так как папка называется A://Letter/Inbox
То 1 и 3 не будет подходить (так как он вышел и вошёл) (то есть A:/Letter и что-то
4 не подойдёт не соотвуствует
Остаётся вариант 2
Ответ:
var x:Real;
begin
write ('x = ');
Readln(x);
if x<0 then Write('y = ',x*x) else
if x>2 then Write('y = ',(3*x-1)/(2*x)) else
Write('y = ',sqr(x)*x+5)
end.
Название видеокартыНазвание монитораРазрешениеОбъём видеопамятиКоличество отображаемых цветовMDA — Monochrome Display AdapterMD720x35064 бита - 128 КбCGA — Color Graphics AdapterCD640x200128 КбHGC — Hercules Graphics CardMD +720x348128 КбEGA (1984)-Enhanced Graphics AdapterECD640x350128 битов - 512Кб16-64VGA (1987) — Video Graphics ArrayBCD640x480256 - 512 КбSVGA — Super VGABCD800x600256 Кб - 1 Мб256 - 16 млн.XGA — extended Graphics ArrayECD1600x12001 - 4 Мб