1 год назад

Помогите срочно!!! Как нарисовать буквы Д В Е в программе "черепашка"? Заранее спасибо

Знания

Информатика

1 ответ:

Hohol19751 год назад

0 0

Turtleart шоль?????:-)

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

Как называется принцип, согласно которому любые данные в памяти компьютера хранятся в виде последовательности битов, то есть в в

Гульшат тазиева

Ответ:

двоичное кодирование

Объяснение:

0 0

3 года назад

Прочитать ещё 2 ответа

Составить блок схему и программу,которая считывает 10 чисел вещественных у пользователя и определяет число положительных чисел и

Катрина123456789

var

a: array[1..10] of real;

b,c,d,f: integer;

begin

f:=1;

writeln('Введите 10 чисел');

for d:=1 to 10 do

begin

readln(a[f]);

if a[f]>0 then

c:=c+1;

if a[f]<0 then

b:=b+1;

f:=f+1;

end;

writeln('Положительных чисел ',' ',c);

writeln('Отрицательных чисел ',' ',b);

end.

0 0

4 года назад

Какие понятия считаются несравнимыми?приведите примерПожалуйста..

Верочка1988

<span>Понятия, которые друг от друга никак не зависят. Например понятия "зеленый" и "тяжелый" ты никак не сравнишь</span>

0 0

4 года назад

1)составьте программу,которая заполняет массив a[1..10] случаынми целыми числами в диапазоне от 0 до 10 и находит минимальный эл

прао

Первое.

var
a:array[0..9] of integer;
i,y,min:integer;
begin
randomize();
for i:=0 to 9 do
begin
y:= random(10);
a[i]:= y;
end;
for i:=0 to 9 do write(a[i],' ');
writeln(' - десять випадкових чисел');
min:=a[0];
for i:=1 to 9 do
if a[i]<min then min:=a[i];
writeln(min, ' - мiнiмальне число.');

end.

Второе

var
a:array[0..9] of integer;
i,y,s,max:integer;
begin
randomize();
for i:=0 to 9 do
begin
y:= random(10);
a[i]:= y;
end;
for i:=0 to 9 do write(a[i],' ');
writeln(' - десять випадкових чисел');
max:=a[0];
for i:=1 to 9 do
if a[i]<max then max:=a[i];
writeln(max, ' - максимальне число.');
s:=0; // сума чисел, що приймають таке значення
for i:=0 to 9 do
if a[i]=max then s:=s+1;
writeln('Зустричается ',s,' раз.');

end.

0 0

4 года назад

Дано действительное число. Вывести целую и дробную части этого числа. Число задать статически.

Ryuk1337 [103]

Const a:real=345.75;
begin
writeln(int(a));
writeln(frac(a));
end.

0 0

4 года назад