Top.Mail.Ru
Ответы
Аватар пользователя
Аватар пользователя
Аватар пользователя
Аватар пользователя
Сборная Домашка
+4

Помогите решить информатика 8 класс

Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае вычесть из него 2. Вывести полученное число 2 Для данного целого x найти значение следующей функции f, принимающей значения целого типа: f(x) = 2·x, если x 2, f(x) = –3·x, в противном случае. (Программа паскаль АБС)

По дате
По рейтингу
Аватар пользователя
Новичок

1) "Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае вычесть из него 2. Вывести полученное число":

123456789101112
 Program P1; 
uses crt; 
var a: integer; 
begin 
clrscr; 
write ('Введите с клавиатуры целое число, после чего нажмите клавишу Enter: '); 
readln (a); 
if a>0 then a:=a+1 else a:=a-2; 
writeln ('Ответ: ', a); 
write ('Программа завершена. Для выхода нажмите клавишу Enter.'); 
readkey; 
end. 

2) "Для данного целого x найти значение следующей функции f, принимающей значения целого типа: f(x) = 2·x, если x 2, f(x) = –3·x, в противном случае." - тут непонятно: что если x 2? - x>2? В общем - ставлю в условии больше - если ошибаюсь поменяйте знак ">" в строке "if x>2 then writeln ('Ответ: f(x)=f(', x, ')=', 2*x) else writeln ('Ответ: f(x)=f(', x, ')=', -3*x);". Знак "меньше" пишется как "<" знак "равно", как "=", знак больше или равно как ">=", меньше или равно - как "<=":

1234567891011
 Program P2; 
uses crt; 
var x: integer; 
begin 
clrscr; 
write ('Введите с клавиатуры значение переменной x (целое число), после чего нажмите клавишу Enter: x='); 
readln (x); 
if x>2 then writeln ('Ответ: f(x)=f(', x, ')=', 2*x) else  writeln ('Ответ: f(x)=f(', x, ')=', -3*x); 
write ('Программа завершена. Для выхода нажмите клавишу Enter.'); 
readkey; 
end. 
Аватар пользователя

Python:

123456
 A = int(input()) 
if A > 0: 
    A += 1 
else: 
    A -= 2 
print(A) 

Pascal:

12345678910
 program If2; 
var 
  N : Integer; 
begin 
  Write('Введите целое число: '); 
  Readln(N); 
  if N>0 then N:=n+1 
  else N:=n-2; 
  writeln(N); 
end. 

C:

123456789101112131415
 #include <stdio.h> 
  
int main(void) 
{ 
   int a; 
   printf("a:"); 
   scanf ("%i", &a); 
   if (a>0) 
      a++; 
   else 
      a=a-2; 
  
   printf("%i\n",a); 
   return 0; 
} 

C++:

12345678910111213141516
 #include <iostream> 
  
using namespace std; 
  
int main() 
{ 
   int a; 
   cout << "a:"; 
   cin >> a; 
   if (a>0) 
      a++; 
   else 
      a=a-2; 
   cout << a; 
   return 0; 
} 

C#:

12345678910111213141516171819
 using System; 
  
namespace ConsoleApp 
{ 
    class Program 
    { 
        static void Main(string[] args) 
        { 
            Console.Write("a:"); 
            int a = Convert.ToInt32(Console.ReadLine()); 
            if (a > 0) 
                a++; 
            else 
                a = a - 2; 
            Console.Write(a); 
            Console.ReadKey(); 
        } 
    } 
} 

Java:

123456789101112131415161718192021
 package abramyan; 
  
import java.util.Scanner; 
  
public class Abramyan { 
  
    public static void main(String[] args) { 
  
        Scanner in = new Scanner(System.in); 
        System.out.print("a:"); 
        int a = in.nextInt(); 
         
        if (a>0) 
            a++; 
         else 
            a=a-2; 
         
        System.out.println(a); 
        in.close();     
    } 
} 
Аватар пользователя
Профи

var x, f: integer;
begin
// Ввод целого числа
readln(x);

// Если число положительное, то прибавить 1; в противном случае вычесть из него 2
if x > 0 then
x := x + 1
else
x := x - 2;

// Вывод полученного числа
writeln(x);

// Для данного целого x найти значение функции f
if x > 2 then
f := 2 * x
else
f := -3 * x;

// Вывод значения функции f
writeln(f);
end.