DevioLab CRYPTO TRADING AUTOMATION
LIVE
AUTOMATED CRYPTO TRADING • BINANCE
Автоматизуйте свій криптопортфель
Торгові боти DevioLab аналізують крипторинок, автоматично відкривають і закривають позиції та керують вашим портфелем на Binance 24/7.
CRYPTO 80 Bots
BINANCE Spot Trading
TRADING 24 / 7
Спробувати DevioLab
deviolab.com

Основи розробки програмного забезпечення

Інформація про навчальний заклад

ВУЗ:
Вінницькій національний технічний університет
Інститут:
Не вказано
Факультет:
Комп'ютерна інженерія
Кафедра:
Не вказано

Інформація про роботу

Рік:
2014
Тип роботи:
Лабораторна робота
Предмет:
Інформаційні технології

Частина тексту файла (без зображень, графіків і формул):

Міністерство освіти і науки, молоді та спорту України Вінницький національний технічний університет Інститут Інформаційних Технологій та Комп’ютерної Інженерії Лабараторна робота № 1 Тема: Основи розробки програмного забезпечення за допомогою мови програмування Pascal. м.Вінниця 2012 Мета: Вивчення основної структури мови програмування Pascal. Завдання: 6. Визначення кількості цифри Х в одновимірному масиві. program MasivX; uses crt; var A,B:array [1..50] of integer; i,x:integer; function max(x:integer):integer; var i,rezult:integer; begin rezult:=A[1]; for i:=2 to x do if A[i]>rezult then rezult:=A[i]; max:=rezult; end; begin writeln('Vvod massiv:'); write('Razmer massiva "x": '); readln(x); for i:=1 to x do A[i]:=0+random(49); clrscr; writeln('Massiv:'); write('A:'); for i:=1 to x do write(A[i],' '); writeln; writeln('Preobrazovannyi massiv:'); for i:=1 to x do B[i]:=A[i]-max(x); write('B:'); for i:=1 to x do write(B[i],' '); readln; end. /// Висновок На данній лабораторній роботі я практично засвоїв основні структури мови програмування Pascal.
Антиботан аватар за замовчуванням

06.02.2014 01:46

Коментарі

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

Ділись своїми роботами та отримуй миттєві бонуси!

Нічого не вибрано
0%

Оголошення від адміністратора

Антиботан аватар за замовчуванням

Подякувати Студентському архіву довільною сумою

Admin

26.02.2023 12:38

Дякуємо, що користуєтесь нашим архівом!