Язык программирования и известный математик -Паскаль;
Специальная микросхема - чипсет;
<span>То же, что и дисковод - накопитель;
</span><span>Один из первых языков программирования - бейсик;
</span><span> Сенсорная панель в ноутбуке - тачпад;
</span><span>Они подразделяются на матричные, струйные и лазерные - принтер;
</span><span>Универсальное устройство вывода информации - монитор;
</span><span>Набор однотипных переменных, объединенных одним именем -массив;
</span><span>Портативный вариант компьютера - ноутбук;
</span><span>Мы его преобразуем из начального состояния в конечное -объект</span>
Не уточнили язык - получите паскаль. Мог бы сделать на С++
program Znanija;
var n,i:integer;
begin
readln(n);
if n < 0 then
begin
writeln('Я не разработал программ');
exit;
end;
write('Я разработал ', n, ' ');
case n of
1:writeln('программу');
2..4:writeln('программы');
0,5..10:writeln('программ');
end;
end.
Когда оно несет в себе информацию. А сообщение несет в себе информацию для человека, если содержащиеся в нем сведения являются для него новыми и понятными.
Задание 1:
Var s,i,n : integer;
z: array [1..100] of integer;
Beginfor
i:= 1 to 8 do
Read (z[i]);
end.
Задание 2:
Var s,i,n : integer;
z: array [1..100] of integer;
BeginRead(n);
for i:= 1 to n do
Read (z[i]);
for i:= 1 to n do
begin
if z[i]<0 then s:= sqr(z[i]);
Write(s);
end;
end.
Задание 3:
Var s,i,n : integer;
z: array [1..100] of integer;
Begin
Read(n);
for i:= 1 to n do
Read (z[i]);
s:=0;
for i:= 1 to n do
if z[i]>10 then s:= s+1;
Write('koll=', s);
end.