Run Code
|
API
|
Code Wall
|
Users
|
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
Please
log in
to post a comment.
h5534
zadanye 3 г
Projet1
Huong11a2@
Задача №3549. Замечательные числа - 5
formato_real
Bilangan fibonacci ke-n
Квартира Задача 6.14 учебн. Грицанова
Banking
Squad equation
Please log in to post a comment.