x, z = int(input("Введите число: "), 0for i in range(2, x//2): if x//i == 0: z = 1if z == 0: print(x, "- простое число")else: print(x, "- не простое число")
@ впервые показали в начале 15 века. Испанские купцы пользовались таким знаком для обмеривания товара. Мера использовалась при покупке скота или вина,это своеобразное сокращение от " arroba",полного названия этой меры. Дальше этот знак использовался в качестве ценника ,а также,пометки для отчётов бухгалтеров. Только после столь длительного пути,этот знак оказался на наших клавиатурах. Рэй Томлинсон стал первым кто сумел отправить настоящее электронное письмо. Электронные коммуникации начали своё развитие именно в тот момент, когда письмо передали между компьютерами-это и было первый e-mail.
// PascalABC.NET 3.2, сборка 1449 от 23.05.2017 // Внимание! Если программа не работает, обновите версию!
type Предназначение=(лекции,лабораторные); Ведомость=record аудитория:integer; этаж:integer; назначение:Предназначение; public constructor Create(pa,pe:integer;pn:Предназначение); begin аудитория:=pa; этаж:=pe; назначение:=pn end; end;
begin var Вед:=new List<Ведомость>; Вед+=new Ведомость(132,1,лекции); Вед+=new Ведомость(204,2,лабораторные); Вед.Println(NewLine) end.
