Напишите программу, вводящую трехзначное число, первая цифра которого равна единице,...

Question

Напишите программу, вводящую трехзначное число, первая цифра которого равна единице, вторая принадлежит промежутку от 1 до 7, а третья на две единицы больше второй.

Comments

какой язык?

Answer 1

Var a,b,c:integer;
begin
randomize;
a:=1;
b:=random(1,7);
c:=b+2;
writeln (a,b,c);
end.

Comments

Ваша программа даже не скомпилируется...

---

а так? все готово!

Answer 2

Var a,b:byte;
Begin
Randomize;
a:=random(7)+1;
b:=a+2;
Write(1,a,b)
End.

Comments

ABC

---

Скопируйте программу и убедитесь - всё правильно работает.

---

у меня - нет

---

крч мне повиг, я только в 6 классе

---

Вижу, и с логикой, и с русским языком, и с Паскалем у Вас проблемы.. Ладно, поФиг:D