Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Квартира из уч. Грицановой с местоположением квартиры на этаже
program kvartira; var k, f, n, p, q, r : integer; begin writeln ('Введите номер квартиры, количество этажей и количество квартир на этаже:'); readln (k, f, n); p := ( k - 1) div ( f * n ) + 1; q := ( k mod ( f * n + 1 ) - 1 ) div n + 1; r := ( k mod ( f * n + 1 ) - 1 ) mod n + 1; writeln ( 'Квартира № ', k, ' аходится в подъезде № ', p, ' на этаже № ', q, ' r= ', r ); end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Trabajo pascal
ariketa 01
Урок 3 задачи 1, 2 и расширение задачи 2
abundante
nested for loop a(iii)
Урок 4 задача 7
Vector Distancia constante
Task 1
mulitp
solar_system_yupiter
Please log in to post a comment.