Program test;
const N = 10;
var i:integer;
a,b,c:array [1..N] of integer;
begin
for i:=1 to N do
begin
a[i]:=random(1,100);//если хочеш ввести с клавы напиши вместо строки readln(a[i]);
b[i]:=random(1,100);//если хочеш ввести с клавы напиши вместо строки readln(b[i]);
end;
for i:=1 to N do
beginif a[i]>b[i] then c[i]:=a[i]-b[i]
else c[i]:=b[i]-a[i];
write(c[i],' ');
end;
end.
3. пуск
5. раскрывающийся
6. мышка
7. окно
9. может быть - графическое
10. программы
1. справка
2. стрелка
4. список
6.
8. отмена
Int P = допустим 20;
int S;
S = P/4 * P/4 ;
возможно не так я не знаю паскаля но алгоритм правельный
#include <iostream>
using namespace std;
int main() {
cout << 7 * 8 / 2; // S = a * h / 2;
return 0;
}
=========================================================
#include <iostream>
using namespace std;
int main() {
int d;
cout << "d = ";
cin >> d;
cout << d * 12 / 2; // S = d1 * d2 / 2;
return 0;
}
=========================================================
#include <iostream>
using namespace std;
int main() {
int ml, botb;
cout << "Enter middle line = ";
cin >> ml;
cout << "Enter the bottom base = ";
cin >> botb;
cout << "The top base = " << 2 * ml - botb;
return 0;
}