Program;
var a,sum,k:integer;
sr:real;
Begin
sum:=0;
k:=0;
while a<>0 do
begin
read(a);
sum:=sum+a;
k:=k+1;
end;
sr:=sum/k;
writeln(sr);
End.
/*VS*/
#include <iostream>
#include <math.h>
using namespace std;
int main()
{
float n;
cout << "Vvedite chislo: ";
cin >> n;
cout << "Exponenta chisla " << n << " = " << exp(n) << endl;
if (exp(n) < 1)
cout << "Proizvedenie: " << exp(n)*n << endl;
else
cout << "Chastnoe: " << exp(n)/n << endl;
system("pause");
return 0;
}
a) Поименованная совокупность байтов на магнитом диске называется ФАЙЛОМ
b) Программа – это описание последовательности действий, который должен выполнить компьютер для решения поставленной задачи обработки данных.
c) Имя файла, как правило, состоит из двух частей, разделенных точкой: собственно имени файла и расширения.
d) Каталоги бывают вложенными в дург друга.
e) Программы для компьютера пишет программист.
128 байт = 1024 бит
1024 / 64 = 16
Ответ: в рисунке использовали 16 точек.
1.
var n,a,min,i:integer;
begin
write('n = ');
readln(n);
min:=999999;
writeln('Вводите числа:');
for i:=1 to n do
begin
readln(a);
if (a mod 9=0)and(a<min) then min:=a;
end;
writeln('min = ',min);
end.
Пример:
n = 5
Вводите числа:
25
99
30
18
87
min = 18
2.
var n,a,s,i:integer;
begin
write('n = ');
readln(n);
s:=0;
writeln('Вводите числа:');
for i:=1 to n do
begin
readln(a);
if abs(a) mod 10=8 then s:=s+a;
end;
writeln('s = ',s);
end.
Пример:
n = 5
Вводите числа:
41
18
25
98
64
s = 116