4 года назад

Придумай и расскажи короткую историю о том, как Коля писал письмо другу. Кодировал ли он при этом информацию?

Знания

Информатика

2 ответа:

kick1235 [1]4 года назад

0 0

Привет, Денис!

Как ты поживаешь? Что нового? Мне подарили веб-камеру, так что теперь мы можем с тобой общаться по Скайпу. Жаль, то до лета, когда мы с тобой сможем увидеться, еще далеко. Но теперь ты можешь показать мне по Интернету свою коллекцию марок, о которой столько рассказывал. Как твоя учеба? У меня, увы, не всегда хорошо - не люблю физику. Как люди в ней разбираются? Зато у меня новое увлечение - стал собирать коллекцию рок-музыки 90-х годов. Не предсталяешь, сколько, оказывается, классных музыкантов тогда было!

Пиши, не пропадай.

Коля.

АЦАМАЗ19874 года назад

0 0

Привет дорогой друг!

Мое лето прошло замечательно. Я весело отдыхал на море, загорал, собирал ракушки и гулял с друзьями. В конце лета меня отправили на дачу. Там я помогал бабушке по хозяйству, а также ходил на речку. Полагаю, что это лето было самым лучшим в моей жизни!

А как ты отдохнул?

Нет,он не кодировал!

Читайте также

Решить задачу в Паскале ) функция у={ 1)1,5соs^2 2)1,8ax. 3)(x-2)^2+6. 4) 3tgx .Условие x<1. 12. Исходные данные а=2.3 .Диапа

Дмитрий37 [1]

Const z = 2.3;var s,d,f,j: real;i:integer;beginj:=0.2;while j < 2.9 dobegins := 1.5*cos(j)*cos(j);writeln(j:4:2 ,s :9:6);j:= j +0.2;end;writeln;j:=0.2;while j < 2.9 dobegins := 1.8*z*j;writeln(j:4:2 ,s :12:6);j:= j +0.2;end;writeln;j:=0.2;while j < 2.9 dobegins := (j-2)*(j-2)+6;writeln(j:4:2 ,s :9:6);j:= j +0.2;end;writeln;j:=0.2;while j < 2.9 dobegins := 3 * sin(j)/cos(j);writeln(j:4:2 ,s :12:6);j:= j +0.2;end; <span>end.</span>

0 0

4 года назад

Решите в Pascal! СРОЧНО! Какую начальную сумму надо положить в банк, чтобы через 50 лет на счёту было 1.000.000 $, если процент

Ane4ka2014

var k,p,d:real;i:integer;begin
write('Write kol:');readln(k);
write('Write percent:');readln(p);
for i:=1 to 50 do
d:=k/(1+(p/100)*i);
writeln(d:0:2);
end.

Код может быть неточен так как нет данных для проверки.

0 0

4 года назад

Паскаль. Дан одномерный массив, значения которого вводятся с клавиатуры . Вычислить количество отрицательных элементов данного м

roman23r5 [2.3K]

Var a:array[1..100] of integer;
I,c,n:integer;
Begin
Readln(n);
For i:=1 to n do
Begin
Read(a[i]);
Write(a[i],' ');
If a[i]<0
Then c:=c+1;
End;
Writeln('кол-во отриц.=',c);
End.

0 0

4 года назад

Введите с клавиатуры числа, количество каторых не превышает 1000 и максимальное число должно оканчиваться на 3 С масивом и без

tolusss [14]

993?-----------------

0 0

4 года назад

B&(A V B) постройте таблицу истинности

Рина7

Такое же задавали, только в эл. виде делать)

0 0

3 года назад