Run Code
|
Code Wall
|
Users
|
Misc
|
Feedback
|
About
|
Login
|
Theme
|
Privacy
homework
Program Test Var(x) Begin WriteLn('Сколько будет 100-55?'); ReadLn(x); If x=45 then WriteLn('Правильно!'); If 0<x>45 or 45<x then WriteLn('Неправильно!'); WriteLn('Сколько будет 28+9?'); ReadLn(x); If x=37 then WriteLn('Правильно!'); If 0<x>37 or 37<x then WriteLn('Неправильно!'); WriteLn('Сколько будет 22-10?'); ReadLn(x); If x=12 then WriteLn('Правильно!'); If 0<x>12 or 12<x then WriteLn('Неправильно!'); End.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Lab 1: Program 1 Hello World
2-3-4-digit
Pokemon1
Project Euler 20 - Factorial digit sum
Régua do Tanque Cilindrico Horizontal
123
checks if a number is exceptional
1
1
09 Ariketa FOR
Please log in to post a comment.