Дженнифер в этой системе будет составлять 15 единиц. Каждый слог в имени даёт по 5 единиц. Так как в имени Дженнифер имеется 3 слога, то число единиц — 15.
Var s:real;
begin
write('s='); readln(s);
if s>1000 then s:=s-0.01*s;
writeln('S=',s);
end.
Пример:
s=1200
S=1020
Блок-схема - в прилагаемом файле
Найдем количество символов в книге: 1024 · 64 · 64 = 2^22.
Один символ кодируется одним байтом, 2^20 байт составляют 1 мегабайт, поэтому информационный объем статьи составляет 2^22 байт = 4 Мб.
ДАНО:
" Война и мир " - 1024 стр.
Какой объём памяти (в мбайт) заняла бы эта книга, если бы Лев Николаевич набирал её на комп. а одной из кодировок unicode?
1 стр - 64 строки
в строке 64 символа
(Каждый символ в кодировке unicode занимает 16 бит памяти.)
Что ты написал не понятно можешь ты написать всё понятно там где я сейчас написал
//Pascal ABC.NET 3.1 сборка 1219
Var
x1,x2,x3,y1,y2,y3:integer;
p1,p2:real;
begin
readln(x1,y1,x2,y2,x3,y3);
p1:=(y3-y1)/(y2-y1);
p2:=(x3-x1)/(x2-x1);
if p1=p2 then writeln('На одной прямой') else writeln('Не на одной прямой');
end.
Пример ввода:
1
1
2
2
3
3
Пример вывода:
<span>На одной прямой</span>