Program1.pas(10) : Операция 'mod' не применима к типу real

@Klater · Регистрация: 11.10.2018

Студворк — интернет-сервис помощи студентам

Pascal

program Olump_1;
var 
s: integer;
n,d: real;
begin
  d:=2;
  s:=1;
  n:=289;
  while n>d do
    if n mod d then
      begin
        read (s:s+d);
        read (d:d+1);
        writeln (s);
      end
    else
      begin
        read (d:d+1);
      end
end.

@bormant · 11.10.2018, 22:37

Сообщение от Klater

Операция 'mod' не применима к типу real

Это верное утверждение. Операция "mod" действительно не применима к типу Real.

@Klater2 · 12.10.2018, 07:38

Изменил:
Program2.pas(10) : Нельзя преобразовать тип integer к boolean

Pascal

program Olump_1;
var 
s,n,d: integer;
begin
  d:=2;
  s:=1;
  n:=289;
  while n>d do
    if n mod d then
      begin
        read (s:s+d);
        read (d:d+1);
        writeln (s);
      end
    else
      begin
        read (d:d+1);
      end
end.

@Puporev · 12.10.2018, 07:49

Pascal

1	if n mod d=? then//вместо ? должно стоять целое число

Написали бы условие задачи, а то в коде какой-то бред.

@bormant Модератор 7655 / 4494 / 2811 Регистрация: 22.11.2013 Сообщений: 12,836 Записей в блоге: 1
	11.10.2018, 22:37	2
	Сообщение от Klater Операция 'mod' не применима к типу real Это верное утверждение. Операция "mod" действительно не применима к типу Real. 0

	12.10.2018, 07:49

Опции темы