SuperSanii
19.08.2022 10:52

Задание: внимательно прочитать задания, выполнить письменно в тетради,
сфотографировать свою работу и отправить учителю на проверку.
1. Определите значение переменной b после выполнения перечисленных команд:

a:=6
b:=4
a:=a+a×b
b:=a/3

2. Определите значения переменных a и b после выполнения перечисленных
команд:

a:=3
b:=5
a:=6+a×b
b:=b+a/3

3. Запишите в виде команды присваивания значения следующие действия:
а) переменной x присвоить значение, равное трети суммы значений a, b, c и d;
б) утроить значение переменной y и уменьшить результат в 2 раза;
в) сменить знак z на противоположный;
г) уменьшить значение n на единицу;
д) найти половину среднего значения величин a, b, c и d.

4. Определить конечные значения переменных X и Y в результате выполнения
следующих команд:

а) X:=1.5 б) X:=1.5
X:=2X+1 Y:=2X+1
Y:=X/2 X:=X2
Y:=X+Y Y:=X+Y
X:=X-Y X:=X-Y

5. Даны значения переменных x и y: x=14, y=3. Какими будут значения этих
переменных после выполнения следующих команд присваивания:
d:=x-1 y:=x x:=d y:=x+y+d d:=d-1 y:=2*d+3
6.(*) Записать команду присваивания значения для переменной S
вычисления площади фигуры на картинке справа по заданной
стороне a.
Например, площадь квадрата со стороной а вычисляется по команде S:=a×a

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
буду1
07.04.2020 00:45

1)

var

  str : string;

begin

  readln (str);

  writeln (length (str) - pos (':', str));

end.

 

2)

var

  str, s : string;

  count, i : integer;

begin

  readln (str);

  s := copy (s, pos ('(', str) + 1, pos (')', str) - pos ('(', str) - 1);

  count := 0;

  for i := 1 to length (s) do

    if s[i] = ' ' then inc (count);

  writeln (count + 1);

end.

 

3)

var

  str : string;

  count : integer;

begin

  readln (str);

  count := 0;

  while pos (',', str) > 0 do

  begin

    inc (count);

    delete (str, pos (',', str), 1);

  end;

  writeln (str);

  writeln (count);

end.

 

Сделано без проверки на соответствие условию.

0,0(0 оценок)
Ответ:
ruslanchik1999
30.10.2021 16:22
Количество всевозможных программ 2^4 = 16
Перечислим их:
1111 =>  4+4+4+4 = 16
1112 =>  4+4+4-3 = 9
1121 =>  4+4-3+4 = 9
1122 =>  4+4-3-3 = 2
1211 =>  4-3+4+4 = 9
1212 =>  4-3+4-3 = 2
1221 =>  4-3-3+4 = 2
1222 =>  4-3-3-3 = -5
2111 => -3+4+4+4 = 9
2112 => -3+4+4-3 = 2
2121 => -3+4-3+4 = 2
2122 => -3+4-3-3 = -5
2211 => -3-3+4+4 = 2
2212 => -3-3+4-3 = -5
2221 => -3-3-3+4 = -5
2222 => -3-3-3-3 = -12

Перечислим полученные результаты с разными числами(одинаковые выводить не будем)
16
9
2
-5
-12

ответ: Таких чисел будет 5(пять)
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота