Skip to content

Instantly share code, notes, and snippets.

View Kanol's full-sized avatar

Andrey Karmanov Kanol

6 followers · 0 following
View GitHub Profile
@Kanol
Kanol / homework.pas
Last active October 9, 2016 16:38
program n4;
var a, b, h, S:real; known:integer;
begin
writeln('1 - катет');
writeln('2 - гипотенуза');
writeln('3 - высота');
writeln('4 - площадь');
write('Введите номер известной величины ');
readln(known);
write('Введите значение известной величины ');
@Kanol
Kanol / homework.pas
Created October 19, 2016 18:12
program n6;
var n, i:integer;
begin
readln(n);
for i:=1 to n do
writeln(random(1000));
end.
@Kanol
Kanol / homework.pas
Created October 19, 2016 18:13
program n7;
var num, mnj:integer;
begin
mnj:=1;
while(num<100000) do begin
num:=(mnj*133)-8;
mnj:=mnj+1;
if num>9999 then
if num mod 134 = 111 then
writeln(num);
@Kanol
Kanol / homework.pas
Created October 19, 2016 18:13
program n7;
var n, i, ed, des, sot, tis, number:integer;
begin
readln(n);
for i:=1 to n do begin
ed:=i mod 10;
des:= (i mod 100) div 10;
sot:= (i div 100) mod 10;
tis:= i div 1000;
if ed=0 then ed:=1;
@Kanol
Kanol / mushrooms.pas
Created December 11, 2016 08:00
program mushrooms;
var input:integer;
output1, output2, output3:real;
begin
readln(input);
if (input mod 2 = 0) then begin
output1 := trunc(input/3.3);
output2 := output1;
end
else begin
@Kanol
Kanol / Balloons.pas
Created December 11, 2016 09:55
program balloons;
var amount, maxWeigth, i, minimum, currentWeigth, maximum, outputAmount, minimumIndex:integer;
weigth: array of integer;
isMax:boolean;
begin
readln(amount, maxWeigth);
setlength(weigth, maxWeigth);
maximum:=0;
for i := 1 to amount do begin
read(weigth[i]);
@Kanol
Kanol / random.html
Created October 3, 2018 08:42
<!doctype html>
<html>
<head>
<meta charset="utf-8">
</head>
<body>
<center>
<input type="text" id="input">
<button onclick="MakeRandom()">
Рандом
@Kanol
Kanol / lesson6.html
Created January 21, 2020 15:08
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<title>Document</title>
<link rel="stylesheet" href="style.css">
</head>
<body>
<header>
@Kanol
Kanol / dfs.py
Created March 19, 2020 07:01
def delete_single_edge():
for i in range(len(matrix)):
if sum(matrix[i]) <= 1:
for j in range(len(matrix[i])):
if matrix[i][j] == 1:
matrix[i][j] = 0
matrix[j][i] = 0
global isSomeEdgeDeleted
isSomeEdgeDeleted = True
break
@Kanol
Kanol / Каркас.py
Last active April 25, 2021 13:37
import pygame
WIDTH = 300
HEIGHT = 250
FPS = 60
pygame.init()
screen = pygame.display.set_mode((WIDTH, HEIGHT))
clock = pygame.time.Clock()
running = True
while running:
for event in pygame.event.get():