Ответы
Ответ дал:
1
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
1)
begin
Println(ReadInteger('x->')<0?'Отрицательное':'Положительное');
end.
2)
begin
Println(ReadInteger('x->').IsEven?'Четное':'Нечетное');
end.
3)
begin
Println(ReadInteger*ReadInteger=ReadInteger?'Правильно':'Неправильно');
end.
//Версия 3.3, сборка 1634 (14.02.2018)
1)
begin
Println(ReadInteger('x->')<0?'Отрицательное':'Положительное');
end.
2)
begin
Println(ReadInteger('x->').IsEven?'Четное':'Нечетное');
end.
3)
begin
Println(ReadInteger*ReadInteger=ReadInteger?'Правильно':'Неправильно');
end.
Аноним:
ReadInteger*ReadInteger=ReadInteger - это, конечно, песня... )))
Старался)
Неподготовленного школьного учителя это может погрузить в ступор.
Так раз сказали сделать в PABC.NET значит он подготовленным должен быть)
Многие пишут на нем, как на ТурбоПаскале. Сдается мне, Вы несколько месяцев назад тоже бы сильно удивились этому коду))
Я то да, но меня в принципе даже не знакомили с .нет паскалем
Но вы же его все равно обнаружили))
Благодаря Вам)
Так....на личности не переходим.
Вас заинтересует
1 год назад
2 года назад
2 года назад
3 года назад
8 лет назад