1.Наливаем в кувшин с 8-ю литрами воду. Из кувшина с 8-ю литрами переливаем воду в кувшин с 3-мя литрами и выливаем воду из 3-ёх литров, у 8-ми литрового кувшина осталось воды 5л. Далее опять из 8-ми литрового (в котором уже 5 литров) кувшина переливаем воду опять в 3-ёх литровый кувшин, выливаем воду из 3-ёх литрового. В кувшине с 8-ю литрами осталось 2 литра воды, переливаем 2 литра в 3-ёх литровый кувшин. Наливаем в 8-ми литровый воду и выливаем 1 литр из 8-ми литрового в 3-ёх литровый кувшин, получаем 7 литров в 8-ми литровом кувшине. Выливаем воду из 3-ёх литрового. Выливаем из 8-ми литрового 3 литра в 3-ёх литровый и получаем 8-ми литровый кувшин с 4-мя литрами. Далее выливаем из 3-ёх литрового кувшина воду и наливаем с 8-ми литрового 3 литра в 3-ёх литровый кувшин.В итоге в 8-ми литровом кувшине остался 1 литр воды. 2.458 убираем последнюю цифру (8) 45*2=90 у 90 убираем последнюю цифру (0) 9*2=18 18*2=36 36*2=72 у 72 убираем последнюю цифру (2) 7*2=14
Program z14; Var q, z:integer; sr, sg, x, y: real;Begin write('Введите число Q = '); readln(q); write('Введите число Z = '); readln(z); writeln('Задание 2:'); if (q = z) then begin sr:= (q + z) / 2; writeln('Среднее арифметическое = ', sr); end else begin sg:= sqrt(q * z); writeln('Среднее геометрическое = ', sg); end; writeln('Задание 3:'); x:= -3; while (x <= 3) do begin y:= 5*x*x - x + 2; writeln('X = ', x, ' Y = ',y); x:= x + 0.5; end;End.
ответ:
хз
объяснение: