program dimavdovuskin497;
type t1 = integer;
t2 = double;
var n, i: t1;
x, summa, pr: t2;
begin
writeln('Напишите программу, вычисляющую: а) сумму n первых натуральных четных чисел; б) произведение n первых натуральных нечетных чисел.');
writeln;
write('Введите общее количество чисел: ');
readln(n);
writeln;
summa := 0;
pr := 1;
for i := 1 to n do
begin
write('Введите х: ');
readln(x);
writeln;
if (frac(x) = 0) then
begin
if (frac(x/2) = 0) then summa := summa + x
else pr := pr * x;
end;
end;
writeln('Сумма n первых натуральных четных чисел равна ', summa : 5 : 0);
writeln;
writeln('Произведение n первых натуральных нечетных чисел равно', pr : 5 : 0);
readln;
end.
Правила организации личной информации в сети Интернет
старайтесь не заполнять анкеты данных в неизвестных чатах, социальных сетях,
не оставляйте встреченным в Интернете людям свой номер телефона, домашний адрес,
не отправляйте неизвестным людям свои фотографии,
общайтесь в программах Skype и им подобным только с друзьями,
не открывайте прикрепленные к письму файлы, полученные от незнакомых людей,
не разглашайте информацию о своем пароле
Правила безопасности в сети Интернет
не договаривайтесь о встрече с незнакомцами,
не отвечайте на недоброжелательные сообщения,
выходите из чата, если чье-то сообщение вызывает беспокойство,
будьте внимательны при загрузке бесплатных программ на компьютер,
если вы получили оскорбляющее сообщение, сообщение о нем родителям,
не поддавайтесь на заманчивые предложения,
не посещайте сайты для взрослых
Правила сетевого этикета
старайтесь выглядеть достойно в глазах собеседников,
пишите грамотно,
человек, с которым вы общаетесь, может быть не один,
сдерживайте страсти,
будьте терпимы к недостаткам окружающих
16 Кбайт = 16 384 Байт
24 Мбайт = 24 576 Кбайт
25 Тбайт = 26 214 400 Мбайт
2 Гбайт = 2 097 152 Кбайт
12 Мбайт = 12 582 912 Байт
8 Мбайт = 67 108 864 Бит
16 Мбайт = 0,015625 Гбайт
24 Тбайт = 24 576 Гбайт
2 Мбайт = 16 777 216 Бит
1 Тбайт = 8 796 093 022 208 Бит
Объяснение:
1 Кбайт = 1024 Байт ⇒ 16 Кбайт = 16 * 1024 = 16 384 Байт
1 Мбайт = 1024 Кбайт ⇒ 24 Мбайт = 24 * 1024 = 24 576 Кбайт
1 Тбайт = 2²⁰ Мбайт ⇒ 25 Тбайт = 25 * 2²⁰ = 26 214 400 Мбайт
1 Гбайт = 2²⁰ Кбайт ⇒ 2 Гбайт = 2 * 2²⁰ = 2 097 152 Кбайт
1 Мбайт = 2²⁰ Байт ⇒ 12 Мбайт = 12 * 2²⁰ = 12 582 912 Байт
1 Мбайт = 2²³ бит ⇒ 8 Мбайт = 8 * 2²³ = 67 108 864 Бит
1 Гбайт = 1024 Мбайт ⇒ 16 Мбайт = 16 : 1024 = 0,015625 Гбайт
1 Тбайт = 1024 Гбайт ⇒ 24 Тбайт = 24 * 1024 = 24 576 Гбайт
1 Мбайт = 2²³ бит ⇒ 2 Мбайт = 2 * 2²³ = 16 777 216 Бит
1 Тбайт = 2⁴³Бит ⇒ 1Тбайт = 1 * 2⁴³ = 8 796 093 022 208 Бит