Сколько чисел от 1 до 2500 (включительно) таковы, что сумма их цифр является простым числом?

ответ : 845 (если мы считаем, что 1 - не простое число)

Решение на фотографии (язык программирования - Python)

Атрибуты представляют собой свойства, характеризующие сущность. В структуре таблицы каждый атрибут именуется и ему соответствует заголовок некоторого столбца таблицы.
Например таблица со списком учеников класса:
Атрибутами будут Имя, Фамилия, идентификатор, дата рождения, адрес, и т.д.
В реляционной базе данных набор атрибутов, соответствующий одной записи таблицы, называется кортежом.
Например:
"Лопоушкина - Алиса - ID1234 - 12.03.1996 - ул.Парковая,13/47" - это один кортеж.
Первичным ключом (ключом отношения, ключевым атрибутом) называется атрибут, однозначно идентифицирующий каждый из его кортежей. Ключ может быть простым (сосотоящим из одного атрибута) и составным (сложным), т. е. состоять из нескольких атрибутов.
Первичный ключ однозначно задаёт кортеж (строку таблицы). В таблице не может быть строк с одинаковыми первичными ключами.
Например, "Лопоушкина" не может быть первичным ключом - вдруг в классе учится её сестра? "Алиса" тоже не может быть первичным ключом - в классе могут учиться тёзки. А например идентификатор - номер, который присваивается автоматически для каждой записи, - отлично подходит на роль первичного ключа.

ну, вообще-то, в задании записан алгоритм только на одном языке. Этот алгоритм находит найбольшее значение израсходованных за телефон денег за день и выводит номер этого дня  (то есть отвечает на вопрос: "в какой день недели я потратил больше всего денег на телефон?"

На экран будет выведено "4", потому что в этот день было потрачено 80 "денег" - наибольшее значение за неделю.

 

На Бейсике программа будет выглядеть так:

DIM Day(7) AS INTEGER
Day(1)=79
Day(2)=25
Day(3)=67
Day(4)=80
Day(5)=63
Day(6)=17
Day(7)=68
m=Day(1)
d=1
FOR i=2 TO 7
IF Day(i)>m THEN
m=Day(i)
d=i
END IF
NEXT i
PRINT d
END

 

На Паскале:

Var
i, m, d: integer
Day: array[1..7] of integer
begin
  Day[1]=79;
  Day[2]=25;
  Day[3]=67;
  Day[4]=80;
  Day[5]=63;
  Day[6]=17;
  Day[7]=68;
  m=Day[1];
  d=1;
  for i:=2 to 7 do
  begin
    if Day[i]>m then
      begin
        m:=Day[i];
        d:=i
      end
  end
  writeln(d);
end.