===== PascalABC.NET =====
begin
var n := Abs(ReadInteger('Введи целое число:'));
if (n mod 10) mod 4 = 0 then
Println('Да')
else
Println('Нет')
end.
Var
x : real;
begin
read (x);
if (x > -1) and (x <= 11) then write ('принадлежит') else write ('не принадлежит');
end.
Зрительная, так как только её нельзя написать..
Если хочешь вывести текст
write('текст'); //Ковычки одинарные
если ты хочешь вывести переменную то без кавычек
a := 1;
write(a);
Также можешь добавить в конец "ln" т.е. writeln(...); после того как выведет он перенесет на следующую строку
Оператор ввода:
Read(переменная); read(a); read(b);
Также и тут можешь перенести строку:
Readln(...);