Ответ:
ответ 2)15. т.к.кротчайшие пути АСЕ(15) ADE(15)
#include <iostream>
#include <cstdlib>
using namespace std;
int main() {
int i,n;
cout<<"Vvedite n: ";
cin>>n;
int a[n];
for (i=0; i<n; i++){
cout<<"Vvedite "<<i+1<<"-e chislo massiva: ";
cin>>a[i];
}
int d=a[1]-a[0];
i=1;
int f=0;
while (i<n-1 && f==0)
{ if (a[i+1]!=(a[i]+d)) f=1; i++; }
if (f==0) cout<<"Proggressia\n"; else cout<<"Ne progressia\n";
cin>>n; //чтобы окно не закрывалось
return 0;
}
1символ=2 байта 2*32*64=4096 байт переводим байты в килобайты 4096/1024=4килобайта 8/4=2 стр.
<u>// PascalABC.NET 3.3, сборка 1634 от 14.02.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var (a,b,c):=ReadReal3('Введите длины сторон треугольника:');
if (a=b) and (a=c) then Writeln('Треугольник равносторонний')
else Writeln('Треугольник не равносторонний')
end.