Информатика объем емкости а равен 3 л,а емкости в -10 л.надо отмерить 5л
180
215
Ответы на вопрос:
1) наливаем 3 л, переливаем в 10 л. 2) повторяем п. 1) 3 раза. получилось 9 л в емкости 10 л. 3) наливаем 3 л, переливаем 1 л в емкость 10 л. получилось 2 л в емкости 3 л и 10 л полные. 4) выливаем 10 л в колодец, а 2 л переливаем из 3 л в 10 л. 5) наливаем 3 л и переливаем в 10 л. получилось 5 л в емкости 10 л. всё!
программа на turbo pascal 7.1:
содержание progs.pas:
{$n+}{-директива для подключения 8087 препоцессора}uses output1; {здесь подключаем модуль output1}
var p: double;
function f1(p: double): double; beginf1: =sqr(p); end;
procedure p1(var p: double); beginreadln(p); p: =f1(p); end;
beginwrite('введите длину стороны квадрата = '); p1(p); p2(p); end.
содержание output1.tpu:
{$n+}{-директива для подключения 8087 препоцессора}unit output1; {здесь объявляем модуль output1}
interface
procedure p2(p: double);
implementation
procedure p2; beginwriteln('площадь квадрата = ',p: 0: 5); end;
end.
Популярно: Информатика
-
tanya59806.02.2023 16:04
-
Yabloco401.11.2021 17:23
-
karins223.05.2022 23:43
-
славаннее18.04.2020 09:21
-
polisavostina25.03.2022 06:34
-
анастатья03.04.2020 19:57
-
Natali888126.09.2020 12:41
-
kdominsk7130.04.2020 14:02
-
nadia29104.03.2022 01:13
-
fox36811.12.2020 19:56