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

Напишите программу на языке pascal. 1. выведите первые 10 целых положительных чисел, которые делятся на 5 и 7 одновременно. 2. пользователь вводит произвольную последовательность целых чисел, заканчивающуюся вводом "0". найти среднее арифметическое среди нечетных положительных чисел
последовательности. 3. выведите таблицу стоимости товара, продаваемого на развес, начиная со 100 г и заканчивая 1.5 кг. пользователь программы вводит стоимость одного килограмма данного товара.

👇
Ответ:
SanzhikGanzhik
SanzhikGanzhik
15.10.2021

1. program ex1;

uses crt;

var i, count : integer;

begin

 count:=0;

 for i:=1 to 9999 do

 begin

   if (i mod 5 = 0) and (i mod 7 = 0) then

   begin

     writeln(i);

     count:=count+1;

     if count=10 then

       break;

   end;      

 end;

end.

2. program ex2;

var sum, count, n : integer;

begin

 count:=0;

 n:=9999;

 sum:=0;

 while not (n = 0) do

 begin

   readln(n);

   if (not n mod 2 = 0) and (n>0) then

   begin

     sum:=sum+n;

     count:=count+1;

   end;

 end;

 writeln('Ср. арифм. = ', sum/count);

end.

3. program ex1;

var price, i: integer;

begin

 write('Введите цену товара за 1 кг. :');

 readln(price);

 for i:=1 to 15 do

   write(i:6, '|');

 writeln();

 for i:=1 to 15 do

   write('');

 writeln();

 for i:=1 to 15 do

   write((price/10*i):6,'|');

end.

4,6(93 оценок)
Открыть все ответы
Ответ:
Evgen2100zzz
Evgen2100zzz
15.10.2021

Исходный код (Python 3.8 x64):

class InvalidArgumentException(Exception): pass

class KeyValuePair:

def __init__(self, key, value):

 self._key = key

 self._value = value  

@staticmethod

def FromList(pair: list):

 if (len(pair) != 2): raise InvalidArgumentException("List must contain strictly 2 elements for initialize KeyValuePair")

 return KeyValuePair(pair[0], pair[1])

@property  

def Key(self):

 return self._key  

@property

def Value(self):

 return self._value

 

def strip(string: str):

return string.strip()

def readWordPairs(wordCount: int, pairSeparator: str = "-") -> dict:

temp = dict()

for i in range(wordCount):

 wordPair = KeyValuePair.FromList(list(map(strip, input(f'{i} pair: ').lower().split(pairSeparator

 if wordPair.Key in temp.keys():

  temp[wordPair.Key] = [temp[wordPair.Key], wordPair.Value]

 else:

  temp[wordPair.Key] = wordPair.Value

return temp

def main():

wordCount = int(input("Enter words pairs count:\n"))

wDict = readWordPairs(wordCount)

while True:

 word = input("Enter word: ")

 if word.lower() == "exit": break

 print(f"Synonim: {wDict[word]}" if word in wDict.keys() else "Not found")

input("press any key to close program")

if __name__ == "__main__":

   main()

Объяснение:

Если есть вопросы - не стесняйтесь задать в комментариях к ответу. Ошибок, которые вы описали в задании, в данном случае не наблюдается. Единственное, я сделал так, что бы программа не завершалась после первого найденного слова, а запрашивала слова до тех пор, пока пользователь не введёт команду exit

4,7(63 оценок)
Ответ:
fddfgdgdhf
fddfgdgdhf
15.10.2021

x = int(input()) - ввод с клавиатуры целого числа

print("{:.2f}".format((2*abs(x+1)+3*(x+1))/(x**2)))

"{:.2f}".format() - форматирует значение путем среза и округляет его до 2-ух знаков после запятой

(2*abs(x+1)+3*(x+1))/(x**2) - вычисляет значение функции

abs(x+1) - модуль значения x+1  

from math import pi - импортирует в программу из библиотеки math переменную pi  

a = int(input()) - ввод с клавиатуры целого числа

print(f'Радиус окружности - {2*pi*a}') - выводит в консоль строку, {2*pi*a} - рассчитывает значение и выводит его в консоль

print(f'Площадь окружности - {pi*(a**2)}') - выводит в консоль строку, {pi*(a**2)} - рассчитывает значение и выводит его в консоль

print(f'') - f-строка, префикс f позволяет внутри функции print в фигурных скобках провести арифметические операции и форматировать их в тип string.

Объяснение:

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