Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Задача 6.14 из учебника Грицановой (квартира)
program kvartira; var k, f, n, p, q : integer; begin writeln ('Введите номер квартиры, количество этажей и количество квартир на этаже:'); readln (k, f, n); p := ( k - 1) div ( f * n ) + 1; q := ( ( k - 1 ) mod ( f * n ) - 1 ) div n + 1; writeln ( 'Квартира № ', k, ' находится в подъезде № ', p, ' на этаже № ', q ); end.
run
|
edit
|
history
|
help
0
Promedio con aprobación
подсчёт кратчайших путей
practica 5 ejercicio 2
Project 16 Pascal
Multiplicação de Matrizes
Assignment 1
IPR2
JohnnyHCao
nombre_completo
Giu