Каждый символ: 8 бит = 1 байт = 1/1024 Мбайт = 1 / (1024 * 1024) (Гб).
Если я правильно понял задание...
Прикрепил фото
Первой пишется координата X, второй Y
Дальше сама в таком же духе =)
1)проблемно-целевой
2)этап разработки сценария и технического задания
3)этап практической работы
4) этап предварительной защиты
5)этап презентации - публичной защиты проекта
Первая программа
var x,s,z:integer;
begin
writeln('Введите целое число:');
readln(x);
z:=x;
while z <> 0 do begin
s:=s + z mod 10;
z:=z div 10;
end;
writeln('Сумма цифр числа ',x,' равна ',s);
end.
Вторая программа
var x,i,z,j,k,leng:integer;
a:array of integer;
begin
writeln('Введите целое число:');
readln(x);
z:=x;
while z <> 0 do begin
leng += 1;
z:=z div 10;
end;
SetLength(a,leng+1);
for i:=leng downto 1 do begin
a[i]:=x mod 10;
x:=x div 10;
end;
for i:=1 to leng do begin
for j:=i to leng-1 do begin
if(a[i] = a[j+1]) then
k += 1;
end;
end;
if(k > 0) then
writeln('Да')
else
writeln('Нет');
end.
Информация — от латинского слова "information", что означает сведения, разъяснения, изложение. Информа́тика<span> — </span>наука<span> о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки </span>информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений. Программи́рование — процесс создания компьютерных программ.