Запишите командами языка программирования команду если значение переменной А меньше или...

Question

Запишите командами языка программирования команду если значение переменной А меньше или равно 100, то значение А увеличивается в 10 раз, если больше 100 - уменьшается в 10 раз. На языке паскаль

Comments

на каком именно языке?

---

а тупанул, не увидел. щас напишу

---

так пойдёт?

---

ага

---

щас допишу

---

да!

---

тебе нужна программа?

---

не программу

---

это то что тебе надо?

---

жду с нетерпением)

Answer 1

Var a:real;
Begin
Write('Число: '); readln(a);
if (a<=100) then a:=a*10<br>else a:=a/100;
Writeln(a);
End.

Comments

ага спасибо

---

ты видимо изучаешь вплотную програмирование?

---

ещё большими буквами обычно выделяют константы

---

ага спасибо

---

пиши переменные маленькими буквами лучше, а ячейки массива большими

---

Var a:real;
Begin
Write('Число: '); readln(a);
if (a<=100) then a:=a*10<br>else a:=a/100;
Writeln(a);
End.

---

var A: real;
BEGIN
write ('введите значение A');
readln (A);
if A <= 100 then A := A*10 else A := A/10;<br>writeln ('A = ', A);
END.

---

а такая правильная как ты думаешь?

---

всё работает?

---

9класс, занимаюсь увлечённо