Категория
Информатика, опубликовано 22.12.2019 21:16

40 , прошу сделать эти блок-схемы я не понимаю как их делать ​

Ответы

Ответ
Ответ оставил: Гость
1. var a: integer;

Begin
if a > 0 then a := a + 1;
write (a);
end.

2. var a: integer;
Begin
if a < 0 then a:= a * 2;
write (a);
end.

3. var a: integer;

Begin
if a <> 0 then a:= a - 4;
write(a);
end.

4. var a: integer;

Begin
if a > 0 then a:= a + 1
else a:= a - 1;
write (a);
end.

5. var a: integer;

Begin
if a = 0 then a:= a + 3
else a:= 0;
write (a);
end.

6. var x, y: real;
if x > y then x:= x*y
else x:= x + y;
write (x);
end.
Ответ
Ответ оставил: Гость
Линейный алгоритм - это такой, в котором все операции выполняются последовательно одна за другой.  Хоть бы загуглил прежде чем баллы тратить
Ответ
Ответ оставил: Гость
Pascal ABC:

var a, b: Integer;
begin
readln(a);
readln(b);
b:=b-1;
for a:=a+1 to b do
writeln(a);
end.

Пример:
Вводим 1 и 5. Получаем:
2
3
4
Ответ
Ответ оставил: Гость
А где координатные оси? Нельзя на это ответить.


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 2 на вопрос по информатике: 40 , прошу сделать эти блок-схемы я не понимаю как их делать ​... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube