4 года назад

Нужно срочно придумать задачу, при решении которой все инструкции нужно выполнить последовательно одну за другой с блок-схемой!

1 ответ:

0 0

Ввод a
Ввод b
Ввод с
Присваивание d:=b*b-4*a*c
Ветвление:
ЕСЛИ d>=0 ТО x1=(-b-корень из d)/(2*а)
х2=(-b+корень из d)/(2*a)
ИНАЧЕ вывод 'КОРНЕЙ НЕТ'

(Это известный алгоритм решения квадратного уравнения)

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

Решите Данные задачи

Наталья19831201 [2]

4: 4 Кб = 4096 б
4096 б / 4096 символов = 1 б - на символ
алфавит содержит 2^8 = 256 символов
10: 375 б :500 = 6 бит на символ
мощность = 2^6 = 64 символа

0 0

4 года назад

Как сделать в паскале движущееся тело по дуге? В моем случае я хочу сделать, что человек кидает камень и он летит по дуге за сче

Lisandrochka

Var
procedure kamen(x, y:integer);
{здесь рисуете свой камень. вместо координат х и у}
begin
{я опишу только анимацию камня. с графикой давно не работал-успел забыть}
x:=300;
y:=400;
while y<>700 do
if y<200 then begin
x:=x+15;
y:=y+10;
setcolor(15);
kamen(x, y);
delay(100);
setcolor(0);
kamen(x, y)
else
x:=x+15;
y:=y-10;
setcolor(15);
kamen(x, y);
delay(100);
setcolor(0);
kamen(x, y);
end;
closegraph;
readln;
end.
все числа нужно подогнать на практике

0 0

4 года назад

На счёт паскалей абс program test_1; var a,b,c,d,e:integer; begin writeln ('Какова масса куска янтаря, хранящегося в Паланге, ес

svetok65 [21]

Надо ввести новую переменную, например y, присвоить её к 1: y:=1
Дальше, в первой задаче ничего не трогаем, во второй пишем: if b=4 then writeln (....) and y:=y+1 else ....
И тоже самое пишем в 3 задаче ( and y:=y+1 ), т.е., если он ответит на все вопросы правильно,то у будет равняться 5, ну и в конце пишем "врайтлн у" и всё))

0 0

4 года назад

Флаговый регистр FLAGS содержит информацию о текущем состоянии: 1)памяти 2)процессора 3)процесса 4)регистра

Тан4а

2) Процессора
(тут какой-то текст, потому что ответ должен быть не менее 20 символов)

0 0

4 года назад

Определи значение переменной с после выполнения фрагмента алгоритма.

Виктор215

a=100

b=30

a=100-b*3(100-90)

(a=10)

a не больше b следовательно

c=b-a

c=30-10

c=20

0 0

4 года назад