var a, b, c, d : integer;
begin
writeln('vvedite a, b, c, d');
readln(a, b, c, d);
if (a > b) then
if (a > c) then
begin
if (a > d) then
writeln ('Выбираем a');
writeln ('Может выбрали a');
end;
readln();
end.
Можно использовать обычный метод (в данном случае статический):
public static function foo() {
throw new RuntimeException("Надо реализовать!");
}
-- и с помощью броска исключения в родителе заставлять реализовывать этот метод в потомках.
Этот подход является своебразной заменой абстрактному родительскому методу
Пользователь вводит целое 5-тизначное число, выведите все его цифры в обратном порядке, например для 14564 получим:
46541
(используйте операции div и mod, подразумевается решение через цикл )
var a, b : integer;
begin
write('Enter a five-digit integer : ');
readln(a);
while ((a mod 10) <> 0) do
begin
b:= a mod 10;
a:= a div 10;
write(b);
end;
readln();
end.
Пользователь вводит целые числа в цикле (разные: четные, нечетные, положительные, отрицательные в любом порядке и количестве). Сохраните в переменные первые три отрицательных нечетных числа, сложите их, выведите сумму на экран и завершите цикл.
Пользователь вводит последовательно три произвольных целых числа. Заведите три переменных и сохраните эти числа в эти переменные. Пользовательский ввод обрабатывайте в цикле.
Примечание: в одном витке цикла должен быть только 1 readln()