<em>// PascalABC.NET 3.3, сборка 1542 от 05.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (n,m):=ReadInteger2('Введите через пробел n и m:');
var a:=ArrRandom(10,n,m);
a.Println
end.
<u>Пример</u>
Введите через пробел n и m: -6 20
15 10 16 17 1 14 -4 19 1 18
A, b, c = int(input())
v = a * b * c
print(v)
Я так понимаю, необходимо написать программу по нахождению площади..
var
a, b, c:integer;
p:real;
begin
writeln('Введите значения длин сторон треугольника ');
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
p:=(a+b+c)/2;
write('Площадь треугольника = ',(sqrt(p*(p-a)*(p-b)*(p-c))):0:2);
end.
<span>#include <stdio.h>
int main()
{<span>
int n, i;</span><span>
scanf("%d", &n);</span><span>
if (n>=1&&n<=50)
{</span><span>
for (i=1; i<=n;i*=2){</span><span>
printf("%d ", i);</span><span> }
</span><span> }
</span><span> return 0;
</span><span>}
</span></span>