1. Загнать два вагона в тупик, оставшийся вагон с тепловозом прогнать дальше по путям. 2. Грузовой состав проезжает тупик, сдает назад, цепляет эти вагоны в хвост состава, вытягивает их на пути и сдает назад на исходную позицию. 3. Тепловоз с оставшимся вагоном уходит в тупик. 4. Грузовой состав бросает прицепленные вагоны и дает ходу. 5. Тепловоз с вагоном выезжает из тупика и подбирает свои вагоны.
label ra,rb;
var a,b,c: integer;
begin
write('Введите сторону a: ');
readln(a);
ra: write('Введите сторону b: ');
readln(b);
if b>a then
begin
rb: write('Введите сторону c: ');
readln(c);
if c>b then begin
if sqr(c)=sqr(a)+sqr(b) then writeln('Этот треугольник - прямоугольный') else writeln('Этот треугольник - не прямоугольный');
end else begin writeln('Введите число больше, чем ',b); goto rb; end;
end else begin writeln('Введите число больше, чем ',a); goto ra; end;
end.
<u>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=MatrRandom(7,7,-50,50);
a.Println(4); Writeln(4*a.ColCount*'-');
Writeln('Сумма по первой строке: ',a.Row(0).Sum)
end.
Свойства информацииВ идеале информация должна быть:•объективной(не зависящей от чьего-либо мнения);•понятнойдля получателя;•полезной(позволяющей получателю решать свои задачи);•достоверной(полученной из надёжного источника);•актуальной(значимой в данный момент); •полной(достаточной для принятия решения)
«История развития компьютерной техники»
СОДЕРЖАНИЕ: Слово «компьютер» означает «вычислитель», т е устройство для вычислений. Потребность в автоматизации обработки данных, в том числе вычислений, возникла очень давно. Более 1500 лет тому назад для счета использовались счетные палочки, камешки и т д
