Задать вопрос!

Задать вопрос!

Все категории

2 года назад

14

Пожалуйста.

............

Информатика

1 ответ:

Юра02042 года назад

0 0

1 вариант является правильным написанием последовательных разделов программы.

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

Какая информация храниться в архиве по годам: фотографии, письма, школьные журналы?

Zander77 [7]

Фотографии - графическая
письма - текстовая, числовая, графическая
школьный журнал - текстовая, числовая

0 0

3 года назад

Напишите пожалуйста в Паскале. В первый день спортсмен пробежал X километров. В каждый последующий день он увеличивал пробег на

Welldone [1]

program raf105;

var x,y,day:real;

begin

write('Сколько спортсмен пробежал в первый день (X): ');

readln(x);

write('Сколько километров он хочет пробежать за день (Y): ');

readln(y);

day:=1;

while x<y do

begin

x:= x+x/100*15;

day:= day+1;

end;

writeln('Спортсмен выполнит цель за ',day,' дн. тренировок');

end.

<em>Программа написана на языке PascalABC</em>

0 0

4 года назад

Вычислите выражение и укажите ответ в десятичной системе счисления. 1001011(2) * 4(10) + 234(8)

iode

$1001011_2=2^6+2^3+2^1+2^0=64+8+2+1=75_{10} \\ 234_8=2\times8^2+3\times8+4=128+24+4=156_{10} \\ 75\times4+156=300+156=456$
<u><em>Ответ:</em></u> 456

0 0

4 года назад

!!!!Написать на языке паскаль ABC!!! Задан вещественный массив. Найти сумму отрицательных элементов после максимального элемента

Сенечка

Program Massive;

uses Crt;

const

M = 6;

var

D: array [1..M] of real;

i: integer;

sum: real;

indexMax: integer;

begin

ClrScr;

Randomize;

writeln ('Massive:');

indexMax := 1;

D[1] := 10;

D[1] := D[1] - Random(20);

writeln (D[1]);

for i:= 2 to M do

begin

D[i] := 10.0;

D[i] := D[i] - Random(20);

writeln (D[i]);

if (D[i] > D[indexMax]) then

begin

indexMax := i;

end;

end;

writeln ('indexMax = ', indexMax);

sum := 0;

for i:= indexMax + 1 to M do

if (D[i] < 0) then sum := sum + D[i];

writeln ('Sum = ', sum);

readln

end.

0 0

3 года назад

Запишите значение переменной b после выполнения фрагмента алгоритма

dowrk1 [1]

по условию:

a=0

b=27

______

|a|<b

подставляем

|0|<27

верно

a=a-2

a=0-2=-2

Дальше идет повтор действий до неверного неравенства.

|-2|;|-4|;|-6|;|-8|;|-10|;|-12|;|-14|;|-16|;|-18|;|-20|;|-22|;|-24|;|-26|;|-28|

|-28|<27

28<27

неверно

b=|-28|

b=28

<h3>Ответ:28</h3>

0 0

4 года назад