В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
95308726
95308726
11.06.2021 19:11 •  Информатика

Информатика. Расположите ответы в правильной последовательности. Таблица 5.4


Информатика. Расположите ответы в правильной последовательности. Таблица 5.4

Показать ответ
Ответ:
DoIIIuPak18
DoIIIuPak18
29.10.2021 10:38
Var a: array of integer; // Объявление массива целых чисел
  i, n: integer; // объявление целочисленных переменных
begin
  // Запросим с клавиатуры размер массива
  // и запишем его в переменную n
  write('введите n:'); 
  readln(n);
  
  // Теперь выделим память под n элементов массива
  SetLength(a, n);
  
  // теперь запросим с клавиатуры n чисел для массива
  for i := 0 to n-1 do begin
    write('a[', i, ']=');
    readln(a[i]);
  end;
  
  // теперь в цикле уменьшим каждый элемент на единицу
  for i := 0 to n-1 do 
    a[i] := a[i] - 1;
  
  // распечатаем массив
  for i := 0 to n-1 do 
    write(a[i], ' ');
end.
0,0(0 оценок)
Ответ:
Chicken10
Chicken10
23.02.2022 08:05

Псевдокод :

Начало

объявление целых переменных a и b

ввод a,b

вывод a+b

вывод a*b

Конец

c# :

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

namespace _1

{

   class Program

   {

       static void Main(string[] args)

       {

           Console.Write("Число a : ");

           int a = int.Parse(Console.ReadLine());

           Console.Write("Число b : ");

           int b = int.Parse(Console.ReadLine());

           Console.WriteLine("Сумма чисел a и b : {0}",a+b);

           Console.WriteLine("Произведение чисел a и b : {0}", a*b);

           Console.ReadKey();

       }

   }

}

PascalABC :

var

 a,b:integer;

Begin

 readln(a,b);

 writeln(a+b);

 writeln(a*b);

End.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота