Var a1,a2:integer;
begin
readln(a1);
readln(a2);
a1:=a1*a1*a1;
a2:=a2*a2*a2;
if a1>a2 then writeln(a1) else
writeln(a2);
end.
Характеристика моего компьютера.
Имя объекта - компьютер. (от английского computer)
Функции объекта - Хранение, обработка и анализ данных.
Элементный состав компьютера -
Основные:
1) Монитор.
2) Клавиатура.
3) Компьютерная мышь.
4) Системный блок.
5) Колонки.
Дополнительные:
1) Веб-камера.
2) Съёмные ОЗУ-накопители.
3) Съёмные накопители.
4) Наушники.
Свойства элементов - элементный состав компьютера выполняет множество свойств, к примеру <em>монитор</em> необходим для того, чтобы выводить графическую или текстовую информацию. Мышь - для управления объектами на рабочем столе. (Ярлыками, папками, документами) Клавиатура - для ввода данных в сам компьютер. Колонки необходимы для вывода звука. Системный блок выполняет функцию опоры всего элементного состава компьютера.
#include<iostream>
using namescacestd;
int main()
{
int size;
float sum=0;
cout<<"pls enter count your array"<<endl;
cin>>size;
float **arr = new float *[size];
for (int v = 0; v < size; v++)
arr[v] = new float[size];
cout<<"pls enter your array"<<endl;
for(int i=0;i<size;i++)
for(int j=0;j<size;j++)
{
cout<<"arr["<<i<<"]["<<j<<"] = ";
cin>>arr[i][j];
cout<<endl;
sum=sum+arr[i][j];
}
cout<<"Sum array = "<<sum<<endl;
free(array);
system("pause");
return 0;
}
program raf105;
var x,y,S: integer;
begin
write('Ввод: ');
readln(x,y);
if x>y then
begin
x:= x-10;
y:= y+24;
end
else
begin
x:= x+5;
y:= y-7;
end;
S:= x-y;
writeln('Вывод: ',x,' ',y,' ',S);
end.
<h3><u><em>Язык PascalABC</em></u></h3>