#include <iostream>
//Размерность#define n 3#define m 3
//Диапозон#define d_min -8#define d_max 6
void enter_arr(int a[n][m]) { printf("\n >> Введите элементы массива \%dx\%d\n",n,m); for (int i = 0; i < n; i++) { printf("\n"); for (int j = 0; j < m; j++) { printf(" << a[\%d][\%d] = ", i+1, j+1); scanf("\%d",&a[i][j]); } }}
void print_arr(int a[n][m]) { printf("\n >> Массив \%dx\%d :", n, m); for (int i = 0; i < n; i++) { printf(" \n >> "); for (int j = 0; j < m; j++) printf("\%d ", a[i][j]); }}
int main(){ setlocale(LC_ALL, "rus"); int a[n][m];
enter_arr(a); print_arr(a);
for (int i = 0; i < n; i++) for (int j = 0; j < m; j++) if ((a[i][j] < d_min) || (a[i][j] > d_max)) a[i][j] *= a[i][j];
print_arr(a);
system("pause>>void"); return 0;}
Program n1;
var a,b,c,max,min: real;
begin
readln(a,b,c);
if(a>b) and (a>c) then max:=a;
if(b>a) and (b>c) then max:=b;
if(c>a) and (c>b) then max:=c;
min:=a;
if b<min then min:=b;
if c<min then min:=c;
writeln('разность: ',max-min);
end.
var r:real;
begin
write ('Введите радиус окружности: ');
read(r);
writeln ('Диаметр равен: ', r*2:0:3);
writeln ('Длина окружности равна: ', 2*pi*r:0:3);
end.
Управляющий объект- Полиционер
Объект управления- машины
Цель управления- Не должна произойти авария
Управляющее воздействие- графическое сообщение
Современные системы программирования обычно предоставляют пользователям мощные и удобные средства разработки программ. В них входят:
компилятор или интерпретатор;
интегрированная среда разработки;
средства создания и редактирования текстов программ;
обширные библиотеки стандартных программ и функций;
отладочные программы, т.е. программы, помогающие находить и устранять ошибки в программе;
"дружественная" к пользователю диалоговая среда;
многооконный режим работы;
мощные графические библиотеки; утилиты для работы с библиотеками
встроенный ассемблер;
встроенная справочная служба;
другие специфические особенности.
Популярные системы программирования — Turbo Basic, Quick Basic, Turbo Pascal, Turbo C.