Задача 1 Урок 10.1

Задача 1 Урок 10.1

Выведите на экран, все числа от 35 до 64.

var i: integer;
begin
  for i:=35 to 64 do
    write(i, ' ');
  readln();
end. 

Задача 2 Урок 10.1

Задача 2 Урок 10.1

Пользователь вводит два целых числа, выведите на экран все числа между ними, причем:

Задача 2 Урок 9

Задача 2 Урок 9

есть код:

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.  
Исправьте форматирование

Исправил:

php Вызов абстрактного метода - как обойти это ограничение

Можно использовать обычный метод (в данном случае статический):

public static function foo() {
        throw new RuntimeException("Надо реализовать!");
    }

-- и с помощью броска исключения в родителе заставлять реализовывать этот метод в потомках.
Этот подход является своебразной заменой абстрактному родительскому методу

Задача 15 Урок 9

Задача 15 Урок 9

У вас есть три числа (три переменные) найдите их медиану (link is external).

Примечание: это условие давалось как простая разминочная задачка для собеседования в Яндекс.

Урок 11. Задача 13.

Урок 11. Задача 13.

Пользователь вводит целое 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. 

Урок 11. Задача 12.

Урок 11. Задача 12.

Получите первую и последнюю цифры числа 15 с помощью операций div и mod (решается без цикла)

var a, b : integer;

begin
  a := (15 div 10);
  b := (15 mod 10);
  writeln('First digit - ', a);
  writeln('Last digit - ', b);
  readln();
end.  

Урок 11. Задача 11.

Урок 11. Задача 11.

Вывести на экран все числа от 4 до 100 с шагом 4, т.е.:
4 8 12 16.......100

var a : integer;

begin
  while (a < 100) do
    begin
     a := a + 4;
     write(a, ' ');
     end;
  readln();
end.

Урок 11. Задача 10.

Урок 11. Задача 10.

Пользователь вводит целые числа в цикле (разные: четные, нечетные, положительные, отрицательные в любом порядке и количестве). Сохраните в переменные первые три отрицательных нечетных числа, сложите их, выведите сумму на экран и завершите цикл.

Урок 11. Задача 9.

Урок 11. Задача 9.

Пользователь вводит последовательно три произвольных целых числа. Заведите три переменных и сохраните эти числа в эти переменные. Пользовательский ввод обрабатывайте в цикле.
Примечание: в одном витке цикла должен быть только 1 readln()

Pages

Subscribe to fkn+antitotal RSS