Категория
Информатика, опубликовано 06.06.2020 22:42

1)Чему будет равно значение переменной x после выполнения следующих команд?

x := 10;

for i := 10 downto 2 do

x := x – i;
2)Необходимо было написать программу, которая позволяет найти наименьшее число, большее 500, кратное 17 и вывести его на экран.

Программист торопился и написал программу с ошибками. Укажите строки, в которых допущены ошибки.

Var x: integer;
Begin
x := 500;
Repeat
x := x – 1;
Until x mod 17 <> 0;
Writeln (x);
End.

Ответы

Ответ
Ответ оставил: Гость
Var  a,b,c,mi: integer;begin
  readln (a,b,c);
  if ((b>a) and (b<c)) or ((b>c) and (b<a)) then mi:=b;
  if ((a>b) and (a<c)) or ((a<b) and (a>c)) then mi:=a;
  if ((c>a) and (c<b)) or ((c<a) and (c>b)) then mi:=c;
  write (mi);
end.    
Ответ
Ответ оставил: Гость
А задание какое? так не до конца понятно
Ответ
Ответ оставил: Гость
Графика с представлением изображения в виде совокупностей точек называется:
Ответ. 2) растровой.
Ответ
Ответ оставил: Гость
Если перевернуть слово рыба будет абыр хахахахахахаха


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

✅ Ответов: 1 на вопрос по информатике: 1)Чему будет равно значение переменной x после выполнения следующих команд?x := 10;for i := 10 downto 2 dox := x – i;2)Необходимо было написать программу, которая позволяет найти наименьшее число, большее 500, кратное 17 и вывести его на экран.Программист торопился и написал программу с ошибками. Укажите строки, в которых допущены ошибки.Var x: int... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube