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

1. Запишіть мовою Паскаль вирази: а) 0,6 в степені (6)
б) 7,3 в степені (-5)
2. Обчисліть значення виразу:
а) (5+7*2)*7
б) (5+8)/10+4
в) 3-8+21 div 3
г) (2+3) mod 7-2

Показать ответ
Ответ:
misharudakov2
misharudakov2
29.10.2020 15:59
uses   crt; const   N=10; var   a:array [1..N] of integer;   i,j,tmp:integer; begin   randomize;   clrscr;   for i:=1 to N do     a[i]:=-100+random(201);   Writeln('Macciv do coptupovki');   for i:=1 to N do     Write(a[i], ' ');   for i:=1 to N-1 do     for j:=i+1 to N do       if a[i]>a[j] then       begin         tmp:=a[j];         a[j]:=a[i];         a[i]:=tmp;       end;   Writeln;   Writeln('Macciv pocle coptupovki');   for i:=1 to N do     Write(a[i], ' ');   readkey end.Двухмерный массив 10 на 10 (array) с названием массива и номером ячейки, заполнен генератором случайных чисел в диапазоне 30.надеюсь смогла
0,0(0 оценок)
Ответ:
TopGmaer
TopGmaer
12.10.2021 14:47

YC = int(input("Какую машину желаете арендовать? Выберите порядковый номер (Subaru - 0, BMW - 1, Lamborgini - 2, Toyota - 3, Tesla - 4, Грузовик - 5 ): ")) #тут забыл поставить скобку

if YC == 0:

print("Машина Subaru арендована!")

if YC == 1:

print("Машина BMW арендована!")

if YC == 2:

print("Машина Lamborgini арендована!")

if YC == 3:

print("Машина Toyota арендована!")

if YC == 4:

print("Машина Tesla арендована!")

if YC == 5:

print("Машина Грузовик занята подождать.")

By = input()

#так-же можно все if после первого заменить на elif что-бы лишний раз не нагружать компьютер. Зачем надо компьютеру обрабатывать другие if если нет совпадающих условий у if?

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