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

Создайте программу, которая выполняет следующие действия: 1. Определите 8 целочисленных переменных. Назначьте этим переменным случайные числа из следующих диапазонов и выведите их на экран:

· От 0 до 15

· От 3 до 10

· От -8 до 2

· От 25 до 50

· От -17 до 22

2. Определите 1 целочисленную переменную. Назначьте начальное значение 10. Используйте процедуры INC и DEC, чтобы изменить значение переменной на следующее: 5, 3, 9, 8, 15, 0, 3, 6. После каждого изменения отображайте значение переменной на экране.

3. Решение квадратных уравнений. Требовать, чтобы клавиатура вводила параметры a, b и c. Вычислить квадратное уравнение

аХ2 + ЬХ + с = 0

корни X1 и X2 и выводим их на экран.

4. Рассчитайте и отобразите на экране значения синуса для следующих углов: 10˚, 30˚, 50˚, 70˚ и 90˚.

5. Требовать, чтобы клавиатура ввела 3 целых числа (коды символов). Выведите на экран символы, соответствующие введенным кодам. Например: при вводе кода 65 на клавиатуре программа должна вывести символ A

6. Выведите на экран квадратные корни из 5 случайных чисел. Диапазон номеров от 1 до 150.

7. Вычислите следующее уравнение и выведите результат на экран:

R = a4 + b3 - c2, где a, b и c - целые числа, вводимые с клавиатуры.

8. Вычислите следующее уравнение и выведите результат на экран:

- x и z - целые числа, вводимые с клавиатуры, y - результат уравнения.

9. Усовершенствовать Задачу 8 - в случае, если введенное значение x меньше -3, вывести утверждение «Вычисления невозможны» и не выполнять вычисления по уравнениям.

10. * Требуется ввести 2 целых числа. Отображение случайного числа в диапазоне от первого введенного до второго введенного числа.

Например, если вы вводите числа 5 и 10, вы должны вывести случайное число в диапазоне от 5 до 10.

паскаль

👇
Открыть все ответы
Ответ:
Жулдуз111
Жулдуз111
06.09.2021
#include <iostream>
#include <stdio.h>
using namespace std;

int main(){
    int y;
    cin>>y;
    y=y%12;
    switch (y){
           case 4:{cout<<"Mouse"; break;}
           case 5:{cout<<"Bull";break;}
           case 6:{cout<<"Tiger";break;}
           case 7:{cout<<"Rabbit";break;}
           case 8:{cout<<"Dragon";break;}
           case 9:{cout<<"Snake";break;}
           case 10:{cout<<"Horse";break;}
           case 11:{cout<<"Goat";break;}
           case 0:{cout<<"Monkey";break;}
           case 1:{cout<<"Cock";break;}
           case 2:{cout<<"Dog";break;}
           case 3:{cout<<"Pig";break;}
           }
    cin.get();
    cin.get();
    return 0;
}
4,5(72 оценок)
Ответ:
kseniyvolcova
kseniyvolcova
06.09.2021
Задачи 1,2,4:
/ PascalABC.Net 3.0, сборка 1066
var
  n:BigInteger;
begin
  var s:=ReadlnString('Введите натуральное число: ');
  If BigInteger.TryParse(s,n) then begin
    var c:=ReadChar('Введите проверяемую цифру: ');
    Writeln(c, ' встречается в ',s,' ',s.Where(x->x=c).Count,' раз');
    Writeln('Максимальная цифра числа: ',s.Where(x->x=s.Max).Distinct);
    Writeln('Перевертыш: ',s.Inverse);
    end
  else Writeln('Ошибка при вводе числа')
end.

Тестовое решение:
Введите натуральное число:  355678679650768680078676985643546809678546263435
Введите проверяемую цифру:  4
4 встречается в 355678679650768680078676985643546809678546263435 4 раз
Максимальная цифра числа: [9]
Перевертыш: 534362645876908645346589676870086867056976876553

Задача 3
// PascalABC.Net 3.0, сборка 1066
begin
  var m:int64:=-1;
  var n:int64:=0;
  Writeln('Принимаются неотрицательные целые числа');
  while (n>=0) and (m<n) do begin
    m:=n;
    n:=ReadInteger('Введите число: ')
  end;
  if m>=n then Writeln('Последовательность невозрастающая')
  else Writeln('Последовательность возрастающая')
end.

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