Program zadacha;
var
a,b,c:real;
begin
read(a,b,c);
if ((a + b) > c) and ((a + c) > b) and ((c + b) > a) then
write('yes');
end.
Pascal:
ln(abs((y-sqrt(abs(x)))*(x-y/(x+sqr(x)/4))))
Program raf105;
var
s: string;
c,i: integer;
begin
write('Введите фразу: ');
readln(s);
for i:=1 to length(s) do
if s[i] = 'o'
then c:= c+1;
writeln('Количество символов "o" в ведённой фразе: ',c);
end.
<h3><u>PascalABC 3.4.2</u></h3>
<span>import java.util.Arrays<span>;
</span>import java.util.Random<span>;
</span>
public class Task2 {
final static int BOUND = 100<span>;
</span> final static int SIZE = 10<span>;
</span>
public static void main(String[] args) {
int[] a = new int[SIZE]<span>;
</span> Random random = new Random()<span>;
</span> for(int i = 0; i < SIZE; a[i] = random.nextInt(BOUND), i++)<span>;
</span> Arrays.stream(a).forEach(x -> System.out.print(x + " "))<span>;
</span> System.out.println("\n" + Arrays.stream(a)
.filter(x -> x > 30 && x < 70).toArray().length)<span>;
</span> }
}
</span>
Дробное значение же получается.
1024х2 = 2048
1024 * 0.2 = 204.8
итого 2252,8 ....
как-то некорректно выходит