Если,у тебя есть компьютер,то это- собственно, это и есть компьютер, по крайней мере, его самая наиважнейшая составляющая. В системном блоке размещены основные устройства приема, передачи, обработки и хранения информации. Именно к нему подключаются все, без исключения, устройства компьютера, например, монитор, клавиатура, принтер.(он может находиться на полу так же и на столе у кого как у меня на полу к примеру в нём ещё есть дисковод))
Конец действия, ставится в конце оператора, функции и т.д.
Надеюсь помог)
<em>begin</em>
<em> writeln (chr(66),chr(69),chr(71),chr(73),chr(78));</em>
<em>end.</em>
3)
var x, y, min, max: real;
label M1;
begin
write('x=');
readln(x);
write('y=');
readln(y);
If x>y then
begin
min:=x;
max:=y;
goto M1;
end
else
min:=y;
max:=x;
goto M1
M1: writeln('min=', min:8:3, ' max=', max:8:3);
end.
2) var a, b, c: real;
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('c=');
readln(c);
If (a=b) and (b=c) then
begin
writeln('Треугольник равносторонний');
end
else
writeln('Треугольник неравносторонний');
end.
1) var a, b: real;
begin
write('Допустимая скорость =');
readln(a);
write('Скорость водителя =');
readln(b);
If (a=b) or (a>b) then writeln('Водитель не превысил скорость');
If a<b then writeln('Водитель превысил скорость');
end.
Я надеюсь, что я правильно поняла задание первой и второй задачи о:
П0 1 П4 ИП4 2 * С/П КИП4 ИП4 ИП0 - x<0 03 С/П