ПОЗНАВАТЕЛЬНОЕ

Оси и плоскости тела человека - Тело человека состоит из определенных топографических частей и участков, в которых расположены органы, мышцы, сосуды, нервы и т.д.

Отёска стен и прирубка косяков - Когда на доме не достаёт окон и дверей, красивое высокое крыльцо ещё только в воображении, приходится подниматься с улицы в дом по трапу.

Дифференциальные уравнения второго порядка (модель рынка с прогнозируемыми ценами) - В простых моделях рынка спрос и предложение обычно полагают зависящими только от текущей цены на товар.

Послідовність виконання роботи 5 страница

Предыдущая 1 2 3 4 567 8 9 10 Следующая

Мета: Формування умінь створення програм з використанням підпрограм-процедур алгоритмічною мовою високого рівня Turbo Pascal.

Теоретичні відомості

Підпрограми призначені для реалізації алгоритмів опрацювання окремих частин (модулів) деякої складної задачі, які можуть взаємодіяти між собою. Кожна підпрограма описується один раз і при необхідності до неї можна багаторазово звертатись. Розрізняють два види підпрограм – підпрограми-процедури і підпрограми-функції. Процедури використовуються для одержання декількох результатів.

Загальний опис процедури:

procedure <назва>(<список формальних параметрів>);

<розділи описів і оголошень процедури>;

Begin

<розділ команд процедури>

end;

До процедури звертаються з основної програми за допомогою команди виклику:

<назва процедури>(<список фактичних параметрів>); .

Хід роботи

2.1 Постановка задачі

Скласти графічний алгоритм і програму для обчислення функції

де s₁ і k₁ - сума і кількість додатних значень елементів масиву А(А₁ , А₂ ,…,А₁₀ ); s₂ і k₂ - сума і кількість додатни х значень елементів масиву В(В₁ , В₂ ,…,В₁₅ ). Для обчислення суми і кількості додатних елементів масиву використати процедуру.

2.2 Графічний алгоритм показаний на рис. 15.1:

а) графічний алгоритм основної програми;

б) графічний алгоритм підпрограми-процедури SUMKOL .

2.3 Таблиця ідентифікації змінних

Змінна	Ідентифікатор
z	z
x	x
a	a[i]
b	b[i]
NMA	NMA
NMB	NMB
s₁	s1
k₁	k1
s₂	s2
k₂	k2

ні

так

б)

а)

Рисунок 15.1 – Графічний алгоритм

2.4 Програма мовою Pascal та результати обчислень

Program PR{Процедура};

Const

x=3.42;

Type

vector=array[1..20] of real;

Var

NMA,NMB,i,k1,k2:integer;

z,s1,s2:real;

a,b:vector;

Procedure SUMKIL(mas:vector;MM:integer;

var s:real;k:integer);

Var

j:integer;

Begin

s:=0;

k:=0;

for j:=1 to MM do

if mas[j]>0 then begin

s:=s+mas[j];

k:=k+1 end;

end;

Begin

writeln('Ведіть кількість елементів масиву А :');

read(NMA);

writeln('Ведіть елементи масиву А :');

for i:=1 to NMA do

read(a[i]);

SUMKIL(a,NMA,s1,k1);

writeln('Ведіть кількість елементів масиву B :');

read(NMB);

writeln('Ведіть елементи масиву B :');

for i:=1 to NMB do

read(b[i]);

SUMKIL(b,NMB,s2,k2);

z:=exp(k1*ln(x))*exp(k2*ln(x))/(s1+s2);

writeln('Результати обчислень :');

writeln('z=',z:6:3);

end.

Результати обчислень :

z=0.713

3 Контрольні запитання

З якою метою використовуються підпрограми-процедури?
Що таке формальні і фактичні параметри в процедурах?
Як оформляється процедура мовою програмування Turbo Pascal?
Яка різниця між зовнішньою і внутрішньою процедурами?
Як формується звернення до підпрограми-процедури мовою програмування Turbo Pascal?
Поясніть, як і куди здійснюється вихід з підпрограми-процедури?

Варіанти завдань наведені нище:

15.1. Дано квадратну матрицю А розміром nxn. Скласти програму нормування матриці, поділивши всі елементи кожного рядка на максимальний елемент за модулем цього рядка. Пошук максимального елемента рядка оформити у вигляді прцедури.

15.2. Дано три одновимірні масиви різної розмірності. Скласти прграму формування одновимірного вектора D, елементами якого є відмінні від нуля мінімальні елементи за модулем заданих масивів. Пошук мінімального елемента за абсолютним значенням виконати у вигляді процедури.

15.3. Оформити у вигляді прграми обчислення функції

e^x=1+x+x²/2!+x³/3!+...

і порівняти одержаний результат зі значенням, отриманим при використанні стандартної функції EXP(X), для х=2,3; 8,5.

15.4. Дано двохвимірний масив. Відсортувати масив по стовпцях у спаданні. Перестановку чисел виконати у вигляді підпрограми.

15.5. Дано два одновимірні масиви, які складаються не більш як з 30 елементів кожний. Використавши підпрограму пошуку максимального елемента, знайти півсуму максимальних елементів заданих масивів.

15.7. Дано два трикутники зі сторонами a, b, c i d, e, f. Використавши підпрограму, визначити, чи ці трикутники є прямокутні чи ні?

15.8. Дано сторони двох трикутників: a, b, c та d, e, f. Знайти, на скільки площа одного трикутника більша від другого. Площа трикутника ABC зі сторонами A, B, C обчислюється за формулою Герона

де R - півпериметр трикутника ABC. Обчислення площі трикутників оформити у вигляді прцедури.

15.9. Дано три квадратні матриці. Сформувати вектор, який складається з мінімальних елементів кожної матриці, відмінних від нуля. Пошук мінімального елемента виконати у вигляді процедури.

15.10. Дана прямокутна матриця. Сформувати вектор, який складається з максимальних елементів кожного стовпця (рядка) матриці. Пошук максимального елемента в стовпці (рядку) виконати у вигляді підпрограми.

15.11. Використовуючи підпрограму обчислення значення однієї функції, обчислити і надрукувати таблицю значень таких функцій:

Аргумент х змінюється від початкового значення 2,8 з кроком 0,15 до кінцевого 3,7.

15.12. Використовуючи підпрограму, обчислити значення функції

Для значень х, які містяться в проміжку [-1,5;1,5] з кроком ∆х=0,5, φ=0, і для значень х, які містяться в проміжку [-2,5;3] з кроком 0,6; φ=0,1. Передбачити недопустимість ділення на 0.

15.13. Скласти прграму знаходження суми стовпців матриці розміром mxn рузельтат записати у вигляді вектора.

15.14. Обчислити значення перших n (n<30) елементів гео-метричної прогресії з допомогою підпрограми, якщо відомий перший елемент прогресії а та знаменник пргресії q. Кожний наступний елемент геометричної прогресії утворюється множенням попереднього на знаменник прогресії. Для розміщення в пам’яті обчислених елементів їх слід оголосити як одновимірний масив.

15.15. Обчислити сполучення з n елементів по m (n<m)

Обчислення факторіала виконати у вигляді підпрограми.

15.16. Дано декартові координати 8 точок. Підрахувати, скільки точок належить площині, обмеженій колом з радіусом R і центром в точці (0,0). Перевірку належності оформити у вигляді підпрограми.

15.17. Дано координати 5 точок. Обчислити і вивести на друк полярні координати. Полярний радіус і полярний кут обчислюються так:

де х, у - декартові координати точок. Переведення в полярні координати виконати у вигляді підпрограми.

15.18. Дано декартові координати 6 точок і координати базової точки. Визначити сумарну віддаль між базовою і рештою точок, а також максимальну віддаль. Обчислення віддалі між двома точками оформити у вигляді процедури.

15.19. Дано дві квадратні матриці одного порядку А і В. Показати, що для них вірний асоціативний закон, тобто А*В=В*А. У випадку стверджувальної відповіді вивести на друк повідомлення “АСОЦІАТИВНИЙ ЗАКОН ВИКОНУЄТЬСЯ”,в противному випадку - “АСОЦІАТИВНИЙ ЗАКОН НЕ ВИКОНУЄТЬСЯ”. Обчислення добутку двох матриць виконати у вигляді підпрограми.

15.20. Дано експерементальні значення чотирьох випадкових величин, кожна з яких має не більше 8 значень. Обчислити дисперсію випадкової величини r_i=1, 2, 3, 4, вважаючи її експериментальними значеннями, математичне сподівання заданих випадкових величин. Математичне сподівання і дисперсія випадкової величини Х обчислюється так:

Обчислення математичного сподівання оформити у вигляді процедури.

15.21. Дано три прямокутні матриці. Знайти слід кожної матриці і вивести на друк значення найменшого за модулем сліду. Обчислення сліду матриці оформити у вигляді підпрограми. Слідом матриці називається сума елементів головної діагоналі.

15.22. Дано три вектори. Визначити максимальний парний елемент кожного вектора і упорядкувати їх за спаданням. Пошук максимального елемента вектора виконати у вигляді підпрограми.

15.23. Дано дві прямокутні матриці. Розв’язати рівняння px+q=0, де p - мінімальний за модулем елемент першої матриці; q - мінімальний за модулем елемент другої матриці. Пошук мінімального за модулем елемента матриці оформити у вигляді процедури.

15.24. Дано координати точок х₁, y₁; x₂, y₂; x₃, y₃; x₄, y₄. Визначити і вивести на друк координати точок, для яких кут між віссю абсцис і променем, що з’єднує точку з початком координат, є максимальним. Обчислення величини кута між віссю абсцис і променем, що з’єднує точку з початком координат, оформити у вигляді підпрограми.

15.25. Обчислити наближено площу фігури, яка обмежена віссю Х, прямими Х=а і Х=b (a<b) і кривою Y=Y(X)=X²/(1+X). Інтервал зміни Х поділити на 10 частин і підсумувати площі десяти прямокутників з основою 0,2; висота прямокутника дорівнює значенню функції на лівій границі його основи. Обчислення площі оформити у вигляді підпрограми. Для значень a=3; b=5; a=7; b=9.

ЛАБОРАТОРНА РОБОТА № 16

Тема: Turbo Pascal. Алгоритми і програми для обробка текстів.

Мета: Формування умінь створення програм для обробки текстів алгоритмічною мовою високого рівня Turbo Pascal.

Теоретичні відомості

Дані типу рядок – це послідовність довільних символів, взятих з обох боків штрих-символами. Змінну типу рядок оголошують за допомогою слова string :

var <змінна> : string[n] ,

де n – довжина рядка, n<256. Довжину рядка можна не зазначати.

Над даними типу рядок визначені такі стандартні функції та процедури:

length(<рядок>) - визначає кількість символів у рядку;

copy(r,m,n) - дає n символів рядка r , починаючи з символу з номером m ;

concat(r1,r2,…,rn) - з’єднує рядки r1,…,rn в один рядок;

pos(r1,r2) - визначає номер символу, з якого починається входження рядка r1 у рядок r2.

insert(r1,<змінна>,n)–вставляє рядок r1 у рядок, заданий змінною,починаючи з позиції n;

delete(<змінна>,m,n) - вилучає n символів з рядка, заданого змінною, починаючи з позиції m ;

str(<число>,<змінна>) – переводить числове дане в дане типу рядок;

val(r1,s1,s2) – засилає у числову змінну s1 числовий образ рядка r1 .

Є два способи опрацювання даних типу string . Перший – можна опрацьовувати весь рядок як єдине ціле, застосовуючи до нього функції та процедури, другий – можна розглядати рядок як масив, складений з елементів-символів, і опрацьовувати його за правилами роботи з елементами масиву.

Хід роботи

2.1 Постановка задачі

Заданий текст, в якому слова розділені крапкою з комою. Вивести на друк слова тексту. Знайти кількість слів в тексті. Якщо слово містить букву “y” , то вивести це слово і вказати, на яких позиціях вона розташована. При відсутності букви “y” в слові вивести це слово і повідомлення «Букви “y” в слові немає». Скласти графічний алгоритм і програму для розв’язування даної задачі.

2.2 Графічний алгоритм показаний на рис. 16.1

2.3 Таблиця ідентифікації змінних

Змінна	slovo	rad	ksliv	pos1	posy
Ідентифікатор	slovo	rad	ksliv	pos1	posy

2.4 Програма мовою Pascal та результати обчислень

Program S_L{sumvol};

Var

pos1,posy:integer;

slovo,rad:string;

ksliv:integer;

Begin

writeln('Введіть текст, в якому слова розділені

символом ";" :');

read(rad);

ksliv:=0;

while pos(';',rad)>0 do

begin

pos1:=pos(';',rad);

if pos1=1 then rad:=copy(rad,pos1+1,length(rad));

так

ні

так

ні

так

Рисунок 16.1 – Графічний алгоритм

if pos1>1 then

begin

slovo:=copy(rad,1,pos1-1);

rad:=copy(rad,pos1+1,length(rad));

posy:=pos('у',slovo);

write('слово: ',slovo);

if posy>0 then

writeln(' ---> буква "у" в слові розташована на

позиції ',posy)

else writeln(' ---> букви "у" в слові немає ');

end;

ksliv:=ksliv+1;

end;

writeln('Кількість слів у тексті, розділених

символом ";" =',ksliv);

End.

Введіть текст, в якому слова розділені символом ";" :

цибуля;огірочок;квасоля;грушка;морква;петрушка;

слово: цибуля ---> буква "у" в слові розташована на

позиції 4

слово: огірочок ---> букви "у" в слові немає

слово: квасоля ---> букви "у" в слові немає

слово: грушка ---> буква "у" в слові розташована на

позиції 3

слово: морква ---> букви "у" в слові немає

слово: петрушка ---> буква "у" в слові розташована

на позиції 5

Кількість слів у тексті, розділених символом ";" = 6

3 Контрольні запитання

Як оголошуються символьні змінні мовою Turbo Pascal?
Скільки символів може міститись в одному програмному рядку ?
Як визначити кількість символів в тексті мовами Turbo Pascal?
Яким програмним засобом виконується перегляд тексту по одному чи по m символів мовою Turbo Pascal?

Варіанти завдань наведені нище:

16.1. В заданому тексті знайти і вивести на друк цифри, які містяться в ньому, і їх кількість.

16.2. В заданому тексті знайти і вивести на друк кількість і номери позицій букви “А”, які містяться в ньому.

16.3. В заданому тексті знайти і вивести на друк кількість цифр і кількість букв, які містяться в ньому.

16.4. Дано текст. Підрахувати кількість малих латинських букв, які містяться в ньому до 10-го символа включно. На друк вивести ці букви і обчислену кількість.

16.5. Дано текст. Вияснити чи є він індетифікатором. Інде-тифікатор - це послідовність букв і цифр, які починаються з букви.

16.6. Дано текст. Вияснити, чи є він числом. Від’ємні числа містять на початку знак мінус.

16.7. Якщо в заданому тексті немає символа “*”, то залишити його без зміни. В противному випадку кожну латинську букву, що розташована перед першим символом “*”, замінити на крапку.

16.8. Дано текст. Якщо він не містить символа “+”, то залишити його без зміни. В противному випадку кожну цифру, яка розташована перед першим символом “+”, замінити на кому.

16.9. Дано текст, який містить букви і пропуски. Якщо в ньому немає слова “весна”, то залишити його без зміни. В противному випадку замінити всі слова “весна” на “зима”. Словом вважати послідовність букв розділених пропусками.

16.10. Дано текст, який містить букви і пропуски. Знайти і надрукувати слова і їх кількість, довжина яких перевищує 5 символів. Словом вважати послідовність букв, розділених про-пусками.

16.11. Дано текст, який містить букви і пропуски. Знайти і надрукувати слова і їх кількість, які містять по 2 букви “А”. Словом вважати послідовність букв, розділених пропусками.

16.12. Дано текст, який містить букви і пропуски. Знайти і надрукувати слова і їх кількість, які закінчуються буквосполу-ченням “ати”. Словом вважати послідовність букв, розділених пропусками.

16.13. Дано текст, який містить букви і пропуски. Знайти слова, які закінчуються буквосполученням “ати”, і замінити це буквосполучення на “али”. Словом вважати послідовність букв, розділених пропусками.

16.14. Дано текст, який містить букви і 2 символи “%”. Знайти кількість букв, розташованих між першим і другим символами “%”.

16.15. Дано текст, який містить букви і пропуски. Знайти і надрукувати слово, в якому міститься найбільше символів “А”. Словом вважати послідовність букв, розділених пропусками.

16.16. Дано текст. Якщо 5-й символ в ньому буква, то замінити його на символ “5”. В противному випадку залишити його без зміни.

16.17. Дано 3 символьні послідовності. Сформувати і надрукувати символьну послідовність, яка складається з 5 перших символів кожної послідовності.

16.18. Дано текст, в якому міститься символ “+”. Поміняти місцями послідовність символів, розташованих до нього, з послідовністю після нього. Заданий і перетворений тексти надрукувати.

16.19. Дано текст, який містить букви і пропуски. Знайти і надрукувати слово, яке складається з найменшої кількості символів. Словом вважати послідовність букв, розділених пропусками.

16.20. Дано текст. Поміняти місцями 5-й і 7-й символи. Заданий і перетворений тексти надрукувати.

16.21. Дано 2 символьні послідовності. Вилучити з першої послідовності кожний символ, що належить і другій послідовності. Надрукувати задані і утворену послідовності.

16.22. Дано текст. Відомо, що в ньому міститься щонайменше одна кома. Вивести на друк заданий текст та номер останньої по порядку коми.

16.23. Дано текст. Вияснити, чи містяться в ньому пари сусідніх букв “ав” або “ва”. Вивести на друк порядкові номери їх перших букв.

16.24. Дано текст. Вияснити, чи містяться в ньому пари сусідніх однакових букв. Вивести на друк ці пари і порядкові номери їх перших букв.

16.25. Дано текст. Перетворити його, вилучивши кожний символ “*” з тексту, і повторити кожний символ, відмінний від “*”.

ЛАБОРАТОРНА РОБОТА № 17

Тема: Turbo Pascal. Алгоритми і програми для організації файлів.

Мета: Формування умінь створення програм для організації файлів та опрацювання даних, що містяться у файлах, алгоритмічною мовою високого рівня Turbo Pascal.

Теоретичні відомості

Файл – це сукупність даних, які розташовані на зовнішньому носії. Дані у файлі називаються елементами. Файловий тип даних описують у розділі описів типів :

type <ім’я типу> =file of <базовий тип> ;

або безпосередньо у розділі оголошення змінних :

var <список змінних>: file of <базовий тип> ;

Є такі різновиди файлів : файл послідовного доступу і файл прямого доступу.

Для опрацювання файлу його необхідно відкрити, виконати необхідна дії та закрити. Файл можна відкрити лише або для читання, або для записування в нього інформації.

Для роботи з файлами є такі команди :

assign(<ім’я файлу>,<зовнішнє ім’я>) – налагоджує зв'язок між іменем файлу і файлом на зовнішньому носії;

reset(<ім’я файлу>) – відкриває файл для читання з нього даних;

read(<ім’я файлу>,<ім’я змінної>) – читає (вводить) дане з файлу в оперативну пам'ять;

close(<ім’я файлу>) – закриває файл;

rewrite(<ім’я файлу>) – відкриває файл для записування в нього даних;

write(<ім’я файлу>,<ім’я змінної>) – записує (виводить) дане у файл;

eof(<ім’я файлу>) – стандартна функція, яка визначає кінець файлу.

Тут <ім’я файлу> - ім’я файлової змінної, задане у розділі оголошення змінних, <зовнішнє ім’я> - ім’я файлу даних на зовнішньому носії, взяте у лапки.

Хід роботи

2.1 Постановка задачі

Сформувати файл, який містить інформацію про 10 автолюбителів: прізвище, марка автомобіля, колір, номер. Використовуючи ці дані, надати інформацію про автолюбителів, які мають “Жигулі” білого кольору і їх номер починається з 45.

2.2 Графічний алгоритм показаний на рис. 17.1

так

ні

так

Рисунок 17.1 – Графічний алгоритм

2.3 Програма мовою Pascal та результати обчислень

Program FF{Файли};

Type

info=record

pr,m,k,no:string;

end;

Var

rr:info;

i,n:integer;

f1:file of info;

Begin

assign(f1,'a');

rewrite(f1);

write('Введіть кількість автолюбителів: ');

readln(n);

for i:=1 to n do

begin

write('Прізвище '); readln(rr.pr);

write('Марка '); readln(rr.m);

write('Колір '); readln(rr.k);

write('Номер '); readln(rr.no);

writeln(rr.pr,' ',rr.m,' ',rr.k,' ',rr.no);

write(f1,rr);

end;

close(f1);

reset(f1);

writeln('Білі жигулі з номером, який починається на 45 :');

writeln(' ');

while not eof(f1) do

begin

read(f1,rr);

if(rr.m='жигулі ')and(rr.k='білий ')and(copy(rr.no,1,2)='45') then writeln(rr.pr,' ',rr.m,' ',rr.k,' ',rr.no);

end;

close(f1);

end.

Результат виконання програми:

Введіть кількість автолюбителів: 10

Іванів жигулі білий 45-96

Петрів волга чорний 85-97

Романів жигулі білий 45-66

Антонів форд синій 55-72

Лесів опель сірий 45-22

Гармаш жигулі білий 33-88

Шишко волга білий 66-12

Дудак ауді червоний 55-96

Гуцуляк жигулі білий 45-00

Носко волга сірий 78-95

Білі жигулі з номером, який починається на 45 :

Іванів жигулі білий 45-96

Романів жигулі білий 45-66

Гуцуляк жигулі білий 45-00

3 Контрольні запитання

Які відмінності між файлом даних послідовного і безпосереднього доступу?
Якими операторами відкривається і закривається файл?
Як визначити кількість записів у файлі безпосереднього доступу?
Для чого використовують функцію EOF?
Як формуються файли мовою Turbo Pascal?

Варіанти завдань наведені нище:

17.1. Сформувати файл А, що містить інформацію про кінострічки:

- назва фільму;

- рік випуску;

- кіностудія;

- режисер.

З файлу А вибрати і переписати у файл В інформацію про кінострічки, зняті кіностудією ім. Довженка у 1985 - 92 рр.

17.2. Сформувати два файли - А і В. У файл А записати назви факультетів. У файл В - назви навчальних груп, приналежність їх до факультету, кількість студентів у групі. Використавши сформовані файли, вивести у вигляді таблиці дані про кількість студентів по факультетах.

Факультет	Кількість студентів

17.3. Сформувати файл А, який містить бібліографічну інформацію:

- автор книги; - назва видавництва;

- назва книги; -обсяг книги (кількість сторінок);

- рік видання.

Переписати у файл В інформацію про книги, видані у видавництві “Дніпро” після 1990 року.

17.4. Сформувати файл А, що містить інформацію про зарплату співробітників:

- прізвище, ім’я та по-батькові;

- посада;

- посадовий оклад;

- рік народження.

Використовуючи ці дані, визначити, у кого з інженерів найбільша, а у кого найменша зарплата.

17.5. Сформувати файл, що складається з відомостей про студентів вашої групи: день, місяць, рік народження, місце проживання, стать (Ч або Ж). Використовуючи сформований файл, вивести на друк прізвища студентів чоловічої статі, які проживають в Івано-Франківській області і яким на даний момент виповнилось 19 років.

17.6. Сформувати файл “К”, що містить інформацію про кубики: розмір кожного кубика (довжина ребра в см), колір (червоний, жовтий, зелений або синій), матеріал (дерево, метал, картон).

Переписати у файл “КІ” дані:

- кількість кубиків кожного з кольорів і їх сумарний об’єм;

- кількість дерев’яних кубіків з ребром 3 см.

17.7. Сформувати файл прямого доступу “ZAPAS”. Компоненти файлу є відомості про запчастини, їх назва, кількість, вартість, термін зберігання (місяці). Сформувати файл, де помістити відомості про ті запчастини, термін зберігання яких більше року, а також вивести на друк кількість запчастин, вартість яких понад 1000 гр., і їх загальну вартість.

17.8. Сформувати файл “В”, записами якого є: прізвища письменників, ініціали, назви книги, рік видання. Використовуючи ці данні, сформувати файл “Е”, де розмістити прізвища письменників, які видають більше двох книг за рік.

17.9 Сформувати файл за результатами сесії студентів групи: академічна група, прізвище та ініціали, оцінки з 4-х дисциплін. Використавши сформований файл, вивести у вигляді таблиці дані про тих студентів, які навчаються без “незадовільних” оцінок, обчислити середній бал групи.

П.І.П-б.	Математика	Хімія	Механіка	Історія

17.10. Сформувати файл “А” із прізвищ і дат народження ваших друзів. Використовуючи сформований файл, надрукувати прізвища тих, хто народився в літні місяці, вік яких перевищує 20 років.

17.11. Сформувати файл “С”, в якому записаний текст, слова в тексті розділені крапкою з комою. Знайти кількість слів в тексті. Вивести на друк слова тексту; якщо слово містить букву “у”, то вказати, на яких позиціях позиціях вона знаходиться в слові, при відсутності букви “у” в слові вивести це слово і повідомлення “Букви у в слові немає”.

17.12. Сформувати файл, який містить інформацію про 10 автолюбителів: прізвище, марка автомобіля, колір, номер. Використовуючи ці дані, надати інформацію про автолюбителів, які мають “Жигулі” білого кольору і їх номер починається з 45.

17.13. Сформувати файл “В”, що містить інформацію про книги по програмуванню в бібліотеці: прізвище автора, назва видавництва, рік видання, алгоритмічна мова. Записати у файл “ВІ” список книг, виданих видавництвом “Просвіта” після 1990 року, а також кількість книг по мові GW BASIC. Ці дані також вивести на друк.

17.14. Відомості про власників автомобілів складаються з їхніх прізвищ, марки автомобіля і державного номера автомобіля. Сформувати файл, що містить ці відомості про 12 автомобілів. Вивести на друк номери автомобілів, які починаються з 3 і закінчуються на 5, і кількість автомобілів кожної марки.

17.15. Сформувати файл, що містить інформацію про книги за таким зразком: прізвище автора, назва, рік видання. Використовуючи сформований файл, знайти назви книг даного автора, рік видання. Прізвище автора ввести з клавіатури.

Предыдущая 1 2 3 4 567 8 9 10 Следующая