Поделитесь своими знаниями, ответьте на вопрос:
На фото 5 во и тут еще 2. 7 во Выделите значения так, чтобы программа печатала значение true. Var t: Boolean i: integer; begin t:= [true /false]; i:=0; repeat t:= [not t / false]; i:=i+1 until i=[100/101/102]; write (t) end. 8 во Выделите один оператор так, чтобы программа печатала только те числа, которые кратны 3. Var x: integer; Begin [x:=5;] [x:=x+1;] while x<100 do begin [x:=x+3;] [x:=x+1;] [write (x)] end; End.
1. sin это арифметическое действие. Синус можно найти из 90 градусов например. А тут X>10. Из чего синус искать, из большего или может из меньшего? Правильной будет запись
if x>10 then ... какое-то действие... sin(x) else ... sin (x);
вообщем нельзя ставить оператор сравнения в арифметическое действие т.к. им задаются условия.
2. Попытка использовать арифметические операции с "false".
3. Выражение теряет смысл. And это логическая операция. Лог выражение должно быть вида A and B. Соответственно исправить можно так '(x=0) and (round(sqrt(x)) mod 2=0)'
4. Не пишут 2 or подряд т. к. теряется логика операции.