Объяснение:
var
N, K, L, P, a : integer;
i : integer;
p0, b : Double;
begin
writeln ('Введите объём бидона '); readln (N);
writeln ('Введите количество улиц '); readln (К);
writeln ('Введите количество литров на улицу '); readln (L);
writeln ('Введите цену литра молока '); readln (P);
p0 := n*p; // цена всего бидона первоначально
for I := 1 to k - 1 do begin // с 1 т.к. первой улице не разбадяжил
p0 := p0 - l*p0/n; // стоимость всего молока реальная для каждой улицы
b := (p-p0/n)*l; // на сколько денег обманул улицу
writeln(Format('%d улице должен вернуть = %f ', [i, b]))
end;
end.
import java.io.BufferedReader;
import java.io.InputStreamReader;
public class prog{
public static void main(String[] args) throws Exception{
BufferedReader reader=new BufferedReader(new InputStreamReader(System.in));
System.out.println("Введите гипотенузу:");
int c=Integer.parseInt(reader.readLine());
System.out.println("Введите длину катета:");
int a=Integer.parseInt(reader.readLine());
double b=Math.sqrt(c*c-a*a);
double P=a+b+c;
System.out.println("Периметр: "+P);
double S=(a*b)/2;
System.out.println("Площадь: "+S);
}
}