Введём обозначения x - назад 2 у - вперёд 3 Всего команд 40 поэтому х+у = 40. Также сказано, что команд назад 2 на 10 больше: х-у = 10 Составим систему уравнений.
выразим из 2 уравнения х, получим: х = 10 + у подставим этот х в 1 уравнение: 10 + у + у = 40 упрощаем: 2у = 30 упрощаем: у = 15 подставим в выраженный ранее х: х = 10 + 15 = 25
Мы получили команд назад 2 - 25, то есть кузнечик в сумме сдвинулся назад на 2*25 = 50, а вперёд на 3*15 = 45. Если мы вычтем из 1 результата 2 то получим 5 - число указывает смещение кузнечика. То есть всю программу можно заменить одной командой: назад 5.
// PascalABC.Net procedure RectangleSquare; var a,b:double; begin Write('Введите через пробел длины сторон прямоугольника: '); Read(a,b); Writeln('Площадь прямоугоьника равна ',a*b) end;
var i:byte; begin for i:=1 to 3 do RectangleSquare end.
Тестовое решение: Введите через пробел длины сторон прямоугольника: 3 7 Площадь прямоугоьника равна 21 Введите через пробел длины сторон прямоугольника: 12.4 15.8 Площадь прямоугоьника равна 195.92 Введите через пробел длины сторон прямоугольника: 14 12.5 Площадь прямоугоьника равна 175
x - назад 2
у - вперёд 3
Всего команд 40 поэтому х+у = 40. Также сказано, что команд назад 2 на 10 больше: х-у = 10
Составим систему уравнений.
выразим из 2 уравнения х, получим: х = 10 + у
подставим этот х в 1 уравнение: 10 + у + у = 40
упрощаем: 2у = 30
упрощаем: у = 15
подставим в выраженный ранее х: х = 10 + 15 = 25
Мы получили команд назад 2 - 25, то есть кузнечик в сумме сдвинулся назад на 2*25 = 50, а вперёд на 3*15 = 45. Если мы вычтем из 1 результата 2 то получим 5 - число указывает смещение кузнечика. То есть всю программу можно заменить одной командой: назад 5.
procedure RectangleSquare;
var
a,b:double;
begin
Write('Введите через пробел длины сторон прямоугольника: '); Read(a,b);
Writeln('Площадь прямоугоьника равна ',a*b)
end;
var
i:byte;
begin
for i:=1 to 3 do RectangleSquare
end.
Тестовое решение:
Введите через пробел длины сторон прямоугольника: 3 7
Площадь прямоугоьника равна 21
Введите через пробел длины сторон прямоугольника: 12.4 15.8
Площадь прямоугоьника равна 195.92
Введите через пробел длины сторон прямоугольника: 14 12.5
Площадь прямоугоьника равна 175