Ответ:
h = 21
Объяснение:
Write ('h = ', h);
'h = ' - константа
h - переменная, печатается ее значение
Ответ:
program Purchase;
var
ik, it: Integer;
ck, ct: Double;
begin
Write ('Количество карандашей и стоимость: ');
ReadLn (ik, ck);
Write ('Количество тетрадей и стоимость: ');
ReadLn (it, ct);
WriteLn ('Всего: ', ik * ck + it * ct :10 :2);
ReadLn;
end.
Не знаю, зачем все так усложнять, по-моему нужно у одной хозяйки вычесть 1 л (5-1) молока и отдать его второй хозяйке (3+1), у них как раз станет по 4 л. Не знаю зачем тут еще 2-литровый бидон
<span>program z1;
Var v,S:Integer; t:real;
Begin
v:=12;
WriteLn('Известно что мальчик бегает в 3 раза больше чем ходит');
WriteLn('3 км/ч его ходьба, следовательно 12 км/ч его бег');
Write('Введите кол-во километров прбегаемых мальчиков: ');
Read(S);
t:=S/v;
WriteLn('Время потраченое мальчиком на пробежку = ',t,' час(ов)');
end.
</span>
Бутер
1. Взять доску
2. Взять колбасу
3. Отрезать два кругляша
4. Взять сыр
5. Отрезать один ломтик
6. Взять хлеб
7. Взять масло
8. Намазать масло на хлеб
9. Положить на хлеб с маслом колбаску
10. Положить на хлеб с маслом и колбаской сыр
11. Положить на хлеб с маслом, колбаской и сыром ещё одну колбаску
12. Пожелать себе бон аппети))