<em>// PascalABC.NET 3.3, сборка 1633 от 10.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ArrRandom(10,-50,50).Println.Sum.Println;
end.
<u>Пример</u>
31 19 1 -45 -14 -32 8 -46 46 -18
-50
запишем условие: V=10Кб/с, t=5 сек, I-?
решение: количество переданной информации можно рассчитать по формуле I=V*t
Выразим скорость передачи информации в байтах/сек
V=10*1024 =10240 б/сек
Теперь найдем I=10240*5=51200 байт это и есть решение задачи
Язык С++.
#include <iostream>
using namespace std;
int main() {
int a, b, c;
cin >> a >> b >> c;
if(a + b > c && a + c > b && b + c > a){
if (a == b && a == c && b == c) {
cout << "Равносторонний." << endl;
}
else if (a == b || a == c || b == c) {
cout << "Равнобедренный." << endl;
}
else {
cout << "Разносторонний." << endl;
}
}
else
cout << "Треугольник не существует." << endl;
}