1. Суть задачи, без инициализации и т.д.
for i:=0 to 19 do
if a[i]=0 then writeln(i)
2. Дан массив чисел размерностью n-1. Написать программу, выводящую корни всех элементов массива, больших 10.
#include <iostream>
using namespace std;
int main() {
int a, b, c;
cout << "a, b, c: ";
cin >> a >> b >> c;
if ((a*a+b*b==c*c)||(a*a+c*c==b*b)||(b*b+c*c==a*a))
cout << "YES";
else cout << "NO";
return 0;
}
Пример:
a, b, c: 1960509751 395427000 1999990249
YES
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -99, 99);
a.Println;
var i := a.IndexMin;
Println('Минимальный элемент', a[i], 'имеет номер', i + 1)
end.
#include <iostream>
using namespace std;
int main()
{
double a, b, c;
cin >> a >> b >> c;
if ((a+b > c) && (a+c > b) && (b+c > a))
{
if (a == b)
if (a == c) cout << "Треугольник равносторонний";
else cout << "Треугольник равнобедренный";
else if ((a == c) || (b == c )) cout << "Треугольник равнобедренный";
else cout << "Треугольник разностронний";
}
else cout << "Невозможно построить треугольник";
return 0;
}