урок 9 задача 15

урок 9

У вас есть код:

var f : integer;
begin
  write('Введите число : ');
  readln(f);
  if f > 5 then
  else
    writeln('Не больше 5!');
 
  readln();
end.

-- который сообщает пользователю, что число не равно нулю (если это действительно так), или в обратной ситуации не делает вообще ничего.

Задача: Перепешите это код в неполной форме (без использования else).


var f : integer;
begin
  write('Введите число : ');
  readln(f);
  if f > 5 then
    if  f =< 5 then
    writeln('Не больше 5!');

  readln();
end.                                
vedro-compota's picture

  • 1) форматирование
  • 2) эта программа вообще когда-то что-то выводит? (нет?)

_____________
матфак вгу и остальная классика =)

isaac_fan's picture

var f : integer;
begin
  write('Введите число : ');
  readln(f);
  if f > 5 then
    writeln('число больше 5');
    if  f =< 5 then
    writeln('Не больше 5!');

  readln();
end.                      
isaac_fan's picture

var f : integer;
begin
  write('Введите число : ');
  readln(f);
  if f > 5 then
    writeln('число больше 5');
    if f <= 5 then
      writeln('Не больше 5!');

  readln();
end.          
vedro-compota's picture

добавление разбор, решить по разбору

_____________
матфак вгу и остальная классика =)