8. моделирование текстового редактора. паскаль авс напишите процедуру save с параметрами: сохраняемый массив, количество строк в массиве, имя файла для сохранения. перед вызовом процедуры обеспечьте диалог с пользователем для выбора имени файла.

288

410

Посмотреть ответы 2

Ответы на вопрос:

shantropa33

Информатика

4,4(80 оценок)

Const n=5; type ta=array[1..n] of string; var ar: ta; i: integer; path: string; procedure save(ar: ta; n: integer; path: string); var i: integer; f: text; begin; assign(f,path); rewrite(f); for i: =1 to n do writeln(f,ar[i]); close(f); end; begin; writeln('введите массив: '); for i: =1 to n do readln(ar[i]); writeln('введите путь к файлу: '); readln(path); save(ar,n,path); end.

Ksu2k17

Информатика

4,8(41 оценок)

Алгоритм решения логарифмических уравнений. 1)смотришь,чтобы у логарифмов были одинаковые основания; если основания разные,то приводишь к одинаковому основанию 2)пишешь одз 3)выполняешь арифметические действия; 4)получаешь ответ,если ответ не сходится с одз,то корней уравнения нет.если корни подходят,то выписываешь,те корни которые подошли