Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
nomer4
var a, b, c, l, f, h, j, x, z, p, ma, i, u, mb, pkol : int64; d, e, g : real; begin assign(input,'input.txt'); assign(output,'output.txt'); reset(input); rewrite(output); read(a, b); while (a mod 7 <> 0) do a := a + 1; while (b mod 7 <> 0) do b := b - 1; p := (b div 7) - (a div 7) + 1; while (a mod 1 <> 0) do a := a + 1; while (b mod 1 <> 0) do b := b - 1; i := (b div 1) - (a div 1) + 1; x := (a+b)*i div 7; pkol := (a + b) * p div 7; writeln(x-pkol) end.
run
|
edit
|
history
|
help
0
rf cdx
Enkripsi2
practica 3 ejercicio 8
Lunohod-2
Урок 3, задача 6 (1479). Без циклов
zadacha2
Linija
shift array to left
bbbrandomchar_0.1
Hello World