1. Уведення даних у клітинки електронних таблиць, їх редагування та форматування;.
2. Обчислення за формулами та з використанням вбудованих функцій.
3. Побудова діаграм і графіків за даними, що містяться в клітинках електронних таблиць.
4. Друкування електронних таблиць, діаграм і графіків.
5. Робота з файлами (відкриття, збереження, перегляд тощо).
Спасибо
Ответ дал: Гость
program xxx;
var a: string;
begin
write('введите строку-');
read(a);
write(a);
readln
end.
Ответ дал: Гость
program n1; const n=10; var mas: array[1..n] of integer; i: integer; max,min,sum: integer; ar: real; begin for i: =1 to n dobegin mas[i]: = random (20)-10; write(mas[i],' '); writeln end; max: =1; for i: =2 to n do if mas[i]> mas[max] then max: =i; writeln; writeln('максимаьное значение a[',max,']= ',mas[max]); min: =1; for i: =2 to n do if mas[i]< mas[min] then min: =i; writeln; writeln(минимальное значение a[',min,']= ',mas[min]); for i: =1 to n do sum: =sum+mas[i]; ar: =sum/n; writeln; writeln('среднее арифметическое = ',ar); end.{немного нерационально но работает=)}
Популярные вопросы