с заданиями! Задание 1 ( ).
Составить программу в Паскале для обработки одномерного массива из 15 чисел. Значения элементов массива задать с клавиатуры самостоятельно. Найти наименьший элемент массива и его номер. В отчет включить программный код и результат работы программы в виде скриншота. Программная реализация обязательна.
Задание 2 ( ).
Составить программу в Паскале для обработки одномерного массива из 10 чисел Х = (-17,3; 13,2; -7; -2,36; 123,4; -0,3; 12,356; 142; 0; -1). Вычислить количество элементов массива с нечетными номерами на отрезке [5, 1 … 32, 4]. В отчет включить программный код и результат работы программы в виде скриншота. Программная реализация обязательна.
ответ: попробуй
объяснение:
void __fastcall tform1: : button1click(tobject *sender)
{
int count = 0;
tstringlist *list = new tstringlist; // г±г®г§г¤г*гґг¬ г±гїгёг±г®гє
list-> loadfromfile("f: \\гљгіг«гјгігёг*\\info.txt");
memo1-> text = list-> text;
list-> delimitedtext = memo1-> text;
memo2-> text = list-> delimitedtext;
for (int i=0; i < list-> count; i++)
{
if ( list-> strings[i].length() < = 4 )
{
count++;
}
}
label1-> caption = inttostr(count);
delete list;
list = null;
}