М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ksenia915
ksenia915
14.08.2022 20:36 •  Информатика

1)составить программу нахождения наименьшего числа из трёх. 2) составить программу для вычисления суммы двух чисел , если они четные. (на паскале) ​

👇
Ответ:
TheOll
TheOll
14.08.2022

1)

Объяснение:

Var

a,b,c: integer;

Begin

Writeln('ВВЕДИТЕ ЧИСЛО a ');

Readln(a);

Writeln('ВВЕДИТЕ ЧИСЛО b ');

Readln(b);

Writeln('ВВЕДИТЕ ЧИСЛО c');

Readln(c);

If ((a<b)AND(a<c)) then

Writeln( ' Наименьшее число a = ' , a);

If ((b<a)AND(b<c)) then

Writeln( ' Наименьшее число b = ' , b);

If ((c<a)AND(c<b)) then

Writeln( ' Наименьшее число c = ' , c);

end.

2)

Var

a,b: integer;

Begin

Writeln('ВВЕДИТЕ ЧИСЛО a');

Readln(a);

Writeln('ВВЕДИТЕ ЧИСЛО b');

Readln(b);

If ((a mod 2 = 0 )AND(b mod 2 = 0)) then

Writeln('СУММА ЧЕТНЫХ ЧИСЕЛ = ' , a+b)

Else

Writeln( 'Два числа не являются четными ' );

end.

4,7(21 оценок)
Открыть все ответы
Ответ:
andriu12252
andriu12252
14.08.2022

что понимать под "переводом программы"

Объяснение:

Program mas_3 ; // название программы mas_3

var s, i: integer; // объявление целочисленных переменных s и i

a: array[1..10] of integer; // объявление целочисленного одномерного массива a размером 10

begin // начало программы

randomize; // инициализация генератора случайных чисел

for i:=1 to 10 do a[i]:=random(100); // заполнение массива a случайными числами в диапазоне от 0 до 99

for i:=1 to 10 do write (a[i],' '); // вывод на экран элементов массива через пробел

s:=0; // присвоение переменной s значения 0

for i:=1 to 10 do // цикл для переменной i от 1 до 10

if (a[i]>10) and (a[i]<30) then s:=s+a[i]; // если значение элемента массива a больше 10 и меньше 30, то к переменной s прибавляем это значение

write('s=', s) // вывод на экран значения s

end. // конец программы

4,5(10 оценок)
Ответ:
Kirill20061337
Kirill20061337
14.08.2022

//С циклом for:

import java.util.Scanner;

import java.util.Arrays; //Если захочется напечатать в консоль массив

public class MyClass {

   public static void main(String args[]) {

       Scanner input = new Scanner(System.in);

       String[] numbers = input.nextLine().split(" "); /split() делит значения после определённого символа, в нашем случае — пробела

       int sum = 0;

   

       for(int i = 0; i<numbers.length; i++) {

           sum += Integer.parseInt(numbers[i]);

       }

       System.out.println("The sum of the numbers: " + sum);

       //System.out.println(Arrays.toString(numbers));

   }

}

//С циклом while:

import java.util.Scanner;

import java.util.Arrays;

public class MyClass {

   public static void main(String args[]) {

       Scanner input = new Scanner(System.in);

       String[] numbers = input.nextLine().split(" ");

       int sum = 0;

       int i = 0;

 

       while(numbers.length != i) {

              sum += Integer.parseInt(numbers[i]);

              i++;

       }

       System.out.println("The sum of the numbers: " + sum);

       //System.out.println(Arrays.toString(numbers));

   }

}

//С циклом do-while:

import java.util.Scanner;

import java.util.Arrays;

public class MyClass {

   public static void main(String args[]) {

       Scanner input = new Scanner(System.in);

       String[] numbers = input.nextLine().split(" ");

       int sum = 0;

       int i = 0;

       

       do {

           sum += Integer.parseInt(numbers[i]);

           i++;

       } while(numbers.length != i);

       

       System.out.println("The sum of the numbers: " + sum);

       //System.out.println(Arrays.toString(numbers));

   }

}

4,6(93 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ